diff options
| author |  herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2003-04-08 07:58:01 +0000 |
|---|---|---|
| committer | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2003-04-08 07:58:01 +0000 |
| commit | 8de569861cb8c3ebc697026c43c583a54bae6ce5 (patch) | |
| tree | 282ba082d2eafe3ea5fa4c80e67be6f03f94000f /parsing/g_basevernac.ml4 | |
| parent | a330ee4a6e399824294887cbb1f496c7ed5a8208 (diff) | |
Ajout option "Local" à "Open Scope"
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@3867 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'parsing/g_basevernac.ml4')
| -rw-r--r-- | parsing/g_basevernac.ml4 | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/parsing/g_basevernac.ml4 b/parsing/g_basevernac.ml4 index f1b8b5575..3d9753783 100644 --- a/parsing/g_basevernac.ml4 +++ b/parsing/g_basevernac.ml4 @@ -245,7 +245,8 @@ GEXTEND Gram l = [ "("; l = LIST1 syntax_modifier SEP ","; ")" -> l | -> [] ] -> VernacSyntaxExtension (s,l) - | IDENT "Open"; IDENT "Scope"; sc = IDENT -> VernacOpenScope sc + | IDENT "Open"; exp = [IDENT "Local" -> false | -> true]; IDENT "Scope"; + sc = IDENT -> VernacOpenScope (exp,sc) | IDENT "Delimits"; IDENT "Scope"; sc = IDENT; "with"; key = IDENT -> VernacDelimiters (sc,key) |