aboutsummaryrefslogtreecommitdiff
path: root/toplevel/vernacentries.ml
diff options
context:
space:
mode:
Diffstat (limited to 'toplevel/vernacentries.ml')
-rw-r--r--toplevel/vernacentries.ml8
1 files changed, 8 insertions, 0 deletions
diff --git a/toplevel/vernacentries.ml b/toplevel/vernacentries.ml
index c72fb248bd..5ae3998f31 100644
--- a/toplevel/vernacentries.ml
+++ b/toplevel/vernacentries.ml
@@ -800,6 +800,14 @@ let _ =
optread=Pp_control.get_margin;
optwrite=Pp_control.set_margin }
+let _ =
+ declare_bool_option
+ { optsync=true;
+ optkey=SecondaryTable("Printing","Universes");
+ optname="the printing of universes";
+ optread=(fun () -> !Constrextern.print_universes);
+ optwrite=(fun b -> Constrextern.print_universes:=b) }
+
let vernac_debug b =
set_debug (if b then Tactic_debug.DebugOn 0 else Tactic_debug.DebugOff)