From 2fd44905ab9eb1991dee9bcc0f3e4720135ab143 Mon Sep 17 00:00:00 2001 From: herbelin Date: Fri, 10 Oct 2003 19:06:03 +0000 Subject: Delimiters N devient 'nat' git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@4579 85f007b7-540e-0410-9357-904b9bb8a0f7 --- parsing/g_cases.ml4 | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'parsing/g_cases.ml4') 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; "'" -> -- cgit v1.2.3