From d1593f3524cfc1d0fdbd0194e05703d15dc9ba00 Mon Sep 17 00:00:00 2001
From: aspiwack
Date: Fri, 14 Aug 2009 16:17:52 +0000
Subject: Ajout de la gestion de Local et Global pour les options (au sens de
 Goptions). - Local Set/Unset ... change la valeur de l'option pour la section
 en cours (ou le module si il n'y a pas de section), l'option est restaurée à
 sa valeur précédente au sortir de la section. - Set/Unset ... survit aux
 sections mais pas aux modules. - Global Set/Unset ... survit aux sections et
 aux modules.

Il y a une légère source d'incompatibilité là, Set avait le comportement
de Local Set. Ça n'apparaît pas dans la lib standard, mais sait-on
jamais.

Les étapes suivantes :
- Supprimer la notion d'option asynchrone, je n'en vois vraiment pas
l'intérêt. Changer le type de retour de declare_option à unit aussi
serait probablement une bonne idée.
- Ajouter le support Local/Global à d'autres commandes sur le même
modèle.

Conflicts:

	parsing/g_vernac.ml4


git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@12280 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 ide/coq.ml | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'ide')

diff --git a/ide/coq.ml b/ide/coq.ml
index 35feb59edf..4fd48a3064 100644
--- a/ide/coq.ml
+++ b/ide/coq.ml
@@ -275,8 +275,8 @@ let rec attribute_of_vernac_command = function
   | VernacDeclareImplicits _ -> []
   | VernacReserve _ -> []
   | VernacSetOpacity _ -> []
-  | VernacSetOption (["Ltac";"Debug"], _) -> [DebugCommand]
-  | VernacSetOption (o,BoolValue true) | VernacUnsetOption o ->
+  | VernacSetOption (_,["Ltac";"Debug"], _) -> [DebugCommand]
+  | VernacSetOption (_,o,BoolValue true) | VernacUnsetOption (_,o) ->
       if coqide_known_option o then [KnownOptionCommand] else []
   | VernacSetOption _ -> []
   | VernacRemoveOption _ -> []
-- 
cgit v1.2.3