aboutsummaryrefslogtreecommitdiff
path: root/pretyping
diff options
context:
space:
mode:
authorPierre-Marie Pédrot2014-06-10 20:24:35 +0200
committerPierre-Marie Pédrot2014-06-10 20:26:46 +0200
commitfb0c2d365cc8921e21efbec521168dba10b69bcd (patch)
tree2ad4d9eb3d927fd2a3c9eb872bd14765801c1fa4 /pretyping
parent186fe5301add12580564f4109b40b326afc481fc (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 'pretyping')
-rw-r--r--pretyping/detyping.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/pretyping/detyping.ml b/pretyping/detyping.ml
index 390c3a82e1..a7a8bf5bed 100644
--- a/pretyping/detyping.ml
+++ b/pretyping/detyping.ml
@@ -29,7 +29,7 @@ open Decl_kinds
let dl = Loc.ghost
(** Should we keep details of universes during detyping ? *)
-let print_universes = ref false
+let print_universes = Flags.univ_print
(****************************************************************************)
(* Tools for printing of Cases *)