diff options
| author | herbelin | 2003-10-10 19:06:03 +0000 |
|---|---|---|
| committer | herbelin | 2003-10-10 19:06:03 +0000 |
| commit | 2fd44905ab9eb1991dee9bcc0f3e4720135ab143 (patch) | |
| tree | 76bd2651a3b9cc8352ef34f0fe4f47a751d4fe8d /parsing/g_cases.ml4 | |
| parent | 32f2652a4355ccbc3cb4082ef3e401cc5ca1c7e0 (diff) | |
Delimiters N devient 'nat'
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@4579 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'parsing/g_cases.ml4')
| -rw-r--r-- | parsing/g_cases.ml4 | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/parsing/g_cases.ml4 b/parsing/g_cases.ml4 index f1f6e47a46..2c5640d181 100644 --- a/parsing/g_cases.ml4 +++ b/parsing/g_cases.ml4 @@ -28,7 +28,8 @@ GEXTEND Gram | IDENT "_" -> CPatAtom (loc,None) (* Hack to parse syntax "(n)" as a natural number *) | "("; G_constr.test_int_rparen; n = bigint; ")" -> - CPatDelimiters (loc,"N",CPatNumeral (loc,n)) + (* Delimiter "N" moved to "nat" in V7 *) + CPatDelimiters (loc,"nat",CPatNumeral (loc,n)) | "("; p = compound_pattern; ")" -> p | n = bigint -> CPatNumeral (loc,n) | "'"; G_constr.test_ident_colon; key = IDENT; ":"; c = pattern; "'" -> |