aboutsummaryrefslogtreecommitdiffhomepage
path: root/lib/flags.ml
diff options
context:
space:
mode:
authorGravatar Enrico Tassi <Enrico.Tassi@inria.fr>2015-05-29 15:41:15 +0200
committerGravatar Enrico Tassi <Enrico.Tassi@inria.fr>2015-05-29 15:44:47 +0200
commite47c30bf431f3c8160b41384eedb538ba16578d0 (patch)
tree24cfa371ee2aa5ed996a88af9346ff448d150d99 /lib/flags.ml
parentf63c0cdd3c7da642e505569e83199784bbfdc367 (diff)
Flag -test-mode intended to be used for ad-hoc prints in test-suite
Of course there is an exception to the previous commit. Fail used to print even if silenced but loading a vernac file. This behavior is useful only in tests, hence this flag.
Diffstat (limited to 'lib/flags.ml')
-rw-r--r--lib/flags.ml2
1 files changed, 2 insertions, 0 deletions
diff --git a/lib/flags.ml b/lib/flags.ml
index 313da0c5b..009caa9de 100644
--- a/lib/flags.ml
+++ b/lib/flags.ml
@@ -48,6 +48,8 @@ let batch_mode = ref false
type compilation_mode = BuildVo | BuildVio | Vio2Vo
let compilation_mode = ref BuildVo
+let test_mode = ref false
+
type async_proofs = APoff | APonLazy | APon
let async_proofs_mode = ref APoff
type cache = Force