From e6825fc049296bba6d3138a3d18f62264d1c14cc Mon Sep 17 00:00:00 2001 From: herbelin Date: Mon, 22 Nov 2004 18:00:14 +0000 Subject: Bug commit 1.71 git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@6344 85f007b7-540e-0410-9357-904b9bb8a0f7 --- parsing/g_vernacnew.ml4 | 5 +---- 1 file changed, 1 insertion(+), 4 deletions(-) diff --git a/parsing/g_vernacnew.ml4 b/parsing/g_vernacnew.ml4 index c2aa505800..2d595088ca 100644 --- a/parsing/g_vernacnew.ml4 +++ b/parsing/g_vernacnew.ml4 @@ -717,10 +717,7 @@ GEXTEND Gram | IDENT "right"; IDENT "associativity" -> SetAssoc Gramext.RightA | IDENT "no"; IDENT "associativity" -> SetAssoc Gramext.NonA | x = IDENT; typ = syntax_extension_type -> SetEntryType (x,typ) - | IDENT "only"; x = [ - IDENT "parsing" -> SetOnlyParsing - | IDENT "printing" -> SetOnlyPrinting - ] -> x + | IDENT "only"; IDENT "parsing" -> SetOnlyParsing | IDENT "format"; s = [s = STRING -> (loc,s)] -> SetFormat s ] ] ; syntax_extension_type: -- cgit v1.2.3