diff options
| author |  mohring <mohring@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2000-11-21 14:13:32 +0000 |
|---|---|---|
| committer | mohring <mohring@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2000-11-21 14:13:32 +0000 |
| commit | 78fb07846e6ca303417699d19beaeaf1a97f96af (patch) | |
| tree | e9056e481fc8d36846408794aacabee70e74f76b /parsing | |
| parent | 7cb292a84437289d1e4f5a6c7a50fe5e7e763ec8 (diff) | |
Begin-End Silent deviennent Set?Unset Silent
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@899 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'parsing')
| -rw-r--r-- | parsing/g_vernac.ml4 | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/parsing/g_vernac.ml4 b/parsing/g_vernac.ml4 index 0a7c0586b..9f10f1941 100644 --- a/parsing/g_vernac.ml4 +++ b/parsing/g_vernac.ml4 @@ -302,7 +302,6 @@ GEXTEND Gram gallina_ext: [ [ - (* Sections *) IDENT "Section"; id = identarg; "." -> <:ast< (BeginSection $id) >> | IDENT "Chapter"; id = identarg; "." -> <:ast< (BeginSection $id) >> @@ -401,12 +400,12 @@ GEXTEND Gram <:ast< (WriteModule $id) >> | IDENT "Write"; IDENT "Module"; id = identarg; s = stringarg; "." -> <:ast< (WriteModule $id $s) >> - | IDENT "Begin"; IDENT "Silent"; "." -> <:ast< (BeginSilent) >> - | IDENT "End"; IDENT "Silent"; "." -> <:ast< (EndSilent) >> | IDENT "Declare"; IDENT "ML"; IDENT "Module"; l = ne_stringarg_list; "." -> <:ast< (DeclareMLModule ($LIST $l)) >> | IDENT "Import"; id = identarg; "." -> <:ast< (ImportModule $id) >> - ] ] + + ] +] ; END |