diff options
Diffstat (limited to 'parsing')
| -rw-r--r-- | parsing/g_tacticnew.ml4 | 2 | ||||
| -rw-r--r-- | parsing/g_vernacnew.ml4 | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/parsing/g_tacticnew.ml4 b/parsing/g_tacticnew.ml4 index 017cfd18f..54c671ed6 100644 --- a/parsing/g_tacticnew.ml4 +++ b/parsing/g_tacticnew.ml4 @@ -213,7 +213,7 @@ GEXTEND Gram ; hypident: [ [ id = id_or_meta -> InHyp id - | "("; "type"; "of"; id = id_or_meta; ")" -> InHypType id ] ] + | "("; IDENT "type"; "of"; id = id_or_meta; ")" -> InHypType id ] ] ; clause: [ [ "in"; idl = LIST1 hypident -> idl diff --git a/parsing/g_vernacnew.ml4 b/parsing/g_vernacnew.ml4 index a9866b7e8..02812d6de 100644 --- a/parsing/g_vernacnew.ml4 +++ b/parsing/g_vernacnew.ml4 @@ -367,7 +367,7 @@ GEXTEND Gram ] ] ; with_declaration: - [ [ IDENT "Definition"; id = base_ident; ":="; c = Constr.constr -> + [ [ "Definition"; id = base_ident; ":="; c = Constr.constr -> CWith_Definition (id,c) | IDENT "Module"; id = base_ident; ":="; qid = qualid -> CWith_Module (id,qid) |