diff options
| author | herbelin | 2004-11-22 18:00:14 +0000 |
|---|---|---|
| committer | herbelin | 2004-11-22 18:00:14 +0000 |
| commit | e6825fc049296bba6d3138a3d18f62264d1c14cc (patch) | |
| tree | 50c32e27c519def3c67a51473cdee732d4961815 | |
| parent | bcef6f7dcd4469178e402726948815c8c71b28a0 (diff) | |
Bug commit 1.71
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@6344 85f007b7-540e-0410-9357-904b9bb8a0f7
| -rw-r--r-- | parsing/g_vernacnew.ml4 | 5 |
1 files changed, 1 insertions, 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: |