diff options
| author |  Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr> | 2014-06-10 20:24:35 +0200 |
|---|---|---|
| committer | Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr> | 2014-06-10 20:26:46 +0200 |
| commit | fb0c2d365cc8921e21efbec521168dba10b69bcd (patch) | |
| tree | 2ad4d9eb3d927fd2a3c9eb872bd14765801c1fa4 /lib | |
| parent | 186fe5301add12580564f4109b40b326afc481fc (diff) | |
Compute the trace of a universe inconsistency only when explicitly required
by the printing options (i.e. when "Print Universes" is set).
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/flags.ml | 2 | ||||
| -rw-r--r-- | lib/flags.mli | 1 |
2 files changed, 3 insertions, 0 deletions
diff --git a/lib/flags.ml b/lib/flags.ml index 530617b0c..9ef32989c 100644 --- a/lib/flags.ml +++ b/lib/flags.ml @@ -81,6 +81,8 @@ let raw_print = ref false let record_print = ref true +let univ_print = ref false + let we_are_parsing = ref false (* Compatibility mode *) diff --git a/lib/flags.mli b/lib/flags.mli index 57e31394e..2ce78d882 100644 --- a/lib/flags.mli +++ b/lib/flags.mli @@ -44,6 +44,7 @@ val load_proofs : load_proofs ref val raw_print : bool ref val record_print : bool ref +val univ_print : bool ref type compat_version = V8_2 | V8_3 | V8_4 | Current val compat_version : compat_version ref |