aboutsummaryrefslogtreecommitdiffhomepage
path: root/library/goptions.mli
diff options
context:
space:
mode:
authorGravatar aspiwack <aspiwack@85f007b7-540e-0410-9357-904b9bb8a0f7>2009-08-14 16:17:52 +0000
committerGravatar aspiwack <aspiwack@85f007b7-540e-0410-9357-904b9bb8a0f7>2009-08-14 16:17:52 +0000
commitd1593f3524cfc1d0fdbd0194e05703d15dc9ba00 (patch)
tree66674bdb53dd7e87212859893957c68b6b61dd13 /library/goptions.mli
parent60ddeba351613457bf921e1db58d63dd2c9ee64f (diff)
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
Diffstat (limited to 'library/goptions.mli')
-rw-r--r--library/goptions.mli5
1 files changed, 5 insertions, 0 deletions
diff --git a/library/goptions.mli b/library/goptions.mli
index aefddbbda..eba44a896 100644
--- a/library/goptions.mli
+++ b/library/goptions.mli
@@ -153,6 +153,11 @@ val get_ref_table :
mem : reference -> unit;
print : unit >
+(* The first argument is a locality flag. [Some true] = "Local", [Some false]="Global". *)
+val set_int_option_value_gen : bool option -> option_name -> int option -> unit
+val set_bool_option_value_gen : bool option -> option_name -> bool -> unit
+val set_string_option_value_gen : bool option -> option_name -> string -> unit
+
val set_int_option_value : option_name -> int option -> unit
val set_bool_option_value : option_name -> bool -> unit
val set_string_option_value : option_name -> string -> unit