aboutsummaryrefslogtreecommitdiff
path: root/vernac/pvernac.ml
diff options
context:
space:
mode:
Diffstat (limited to 'vernac/pvernac.ml')
-rw-r--r--vernac/pvernac.ml5
1 files changed, 2 insertions, 3 deletions
diff --git a/vernac/pvernac.ml b/vernac/pvernac.ml
index 08625b41a6..aebded72f8 100644
--- a/vernac/pvernac.ml
+++ b/vernac/pvernac.ml
@@ -51,12 +51,11 @@ module Vernac_ =
let noedit_mode = gec_vernac "noedit_command"
let () =
- let open Extend in
let act_vernac v loc = Some v in
let act_eoi _ loc = None in
let rule = [
- Rule (Next (Stop, Atoken Tok.PEOI), act_eoi);
- Rule (Next (Stop, Aentry vernac_control), act_vernac);
+ Rule (Next (Stop, Pcoq.G.Symbol.token Tok.PEOI), act_eoi);
+ Rule (Next (Stop, Pcoq.G.Symbol.nterm vernac_control), act_vernac);
] in
Pcoq.grammar_extend main_entry (None, [None, None, rule])