diff options
| author |  gareuselesinge <gareuselesinge@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2013-06-19 08:39:28 +0000 |
|---|---|---|
| committer | gareuselesinge <gareuselesinge@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2013-06-19 08:39:28 +0000 |
| commit | 4b2963052ac92e67f08651d8f01e562007c07a34 (patch) | |
| tree | 151473076aeea21fb75b473fa7b93032b3adaca9 /parsing/g_ltac.ml4 | |
| parent | 9fd57222b55d9840ebfe4ecae7c9af5562374908 (diff) | |
parse "of" as KEYID "of"
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@16591 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'parsing/g_ltac.ml4')
| -rw-r--r-- | parsing/g_ltac.ml4 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/parsing/g_ltac.ml4 b/parsing/g_ltac.ml4 index 482f0df72..0b2515554 100644 --- a/parsing/g_ltac.ml4 +++ b/parsing/g_ltac.ml4 @@ -135,7 +135,7 @@ GEXTEND Gram ConstrEval (rtc,c) | IDENT "context"; id = identref; "["; c = Constr.lconstr; "]" -> ConstrContext (id,c) - | IDENT "type"; IDENT "of"; c = Constr.constr -> + | IDENT "type"; KEYID "of" ; c = Constr.constr -> ConstrTypeOf c ] ] ; constr_may_eval: (* For extensions *) |