diff options
| author | Jim Fehrle | 2019-10-30 14:57:57 -0700 |
|---|---|---|
| committer | Jim Fehrle | 2019-10-30 14:57:57 -0700 |
| commit | 2e04ae60563534fc6f339149051d2d8c09d7a69a (patch) | |
| tree | bb2ab1a4d5723b8a1b70215dff9f18f3b0b177e4 /vernac | |
| parent | 28ea499486dd17076d8f2f4c31d7fdebeacdff8e (diff) | |
Rename the 2 local type_cstr nonterminals to give them unique names
Diffstat (limited to 'vernac')
| -rw-r--r-- | vernac/g_vernac.mlg | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/vernac/g_vernac.mlg b/vernac/g_vernac.mlg index efcb2635be..1387ca4675 100644 --- a/vernac/g_vernac.mlg +++ b/vernac/g_vernac.mlg @@ -418,19 +418,19 @@ GRAMMAR EXTEND Gram rec_definition: [ [ id_decl = ident_decl; bl = binders_fixannot; - rtype = type_cstr; + rtype = rec_type_cstr; body_def = OPT [":="; def = lconstr -> { def } ]; notations = decl_notation -> { let binders, rec_order = bl in {fname = fst id_decl; univs = snd id_decl; rec_order; binders; rtype; body_def; notations} } ] ] ; corec_definition: - [ [ id_decl = ident_decl; binders = binders; rtype = type_cstr; + [ [ id_decl = ident_decl; binders = binders; rtype = rec_type_cstr; body_def = OPT [":="; def = lconstr -> { def }]; notations = decl_notation -> { {fname = fst id_decl; univs = snd id_decl; rec_order = (); binders; rtype; body_def; notations} } ]] ; - type_cstr: + rec_type_cstr: [ [ ":"; c=lconstr -> { c } | -> { CAst.make ~loc @@ CHole (None, IntroAnonymous, None) } ] ] ; |
