]> matita.cs.unibo.it Git - helm.git/commitdiff
no more universe inconsistency printed to stderr
authorEnrico Tassi <enrico.tassi@inria.fr>
Thu, 15 Jan 2009 15:31:25 +0000 (15:31 +0000)
committerEnrico Tassi <enrico.tassi@inria.fr>
Thu, 15 Jan 2009 15:31:25 +0000 (15:31 +0000)
helm/software/components/cic/cicUniv.ml

index fc01328ab1d0fbdfbc697372fa1e6f4685e00849..58dc5cd6cfc82af8641150ba34168d5281716f4a 100644 (file)
@@ -317,7 +317,7 @@ let error arc node1 closure_type node2 closure =
      "   of\n" ^ 
      "\t" ^ (string_of_universe node2) ^ "\n\n" ^
      "  ===== Universe Inconsistency detected =====\n") in
-  prerr_endline (Lazy.force s);
+(*   prerr_endline (Lazy.force s); *)
   raise (UniverseInconsistency s)