]> matita.cs.unibo.it Git - helm.git/commitdiff
Debugging disabled
authorAndrea Asperti <andrea.asperti@unibo.it>
Thu, 18 Nov 2010 10:52:40 +0000 (10:52 +0000)
committerAndrea Asperti <andrea.asperti@unibo.it>
Thu, 18 Nov 2010 10:52:40 +0000 (10:52 +0000)
matita/components/ng_paramodulation/nCicParamod.ml
matita/components/ng_paramodulation/paramod.ml
matita/components/ng_tactics/nnAuto.ml

index 41d27cab934794f0df9d658b39aad00c7b93dad4..ef9852fcc359c24a7d322b213260595343ddf3ef 100644 (file)
@@ -16,9 +16,9 @@ NCicBlob.set_default_eqP()
 NCicProof.set_default_sig()
 ;;
 
-let debug _ = ();;
+let noprint _ = ();;
 let print s = prerr_endline (Lazy.force s);; 
-let debug = print;;
+let debug = noprint;; 
 
 module B(C : NCicBlob.NCicContext): Orderings.Blob 
   with type t = NCic.term and type input = NCic.term 
index 7a63dd97a292150b5e6ee3e4120ba9981cc78827..86a964c1487f36a7f72deb0c8f2608f621ec2aac 100644 (file)
@@ -13,7 +13,7 @@
 
 let print s = prerr_endline (Lazy.force s) ;; 
 let noprint s = ();;  
-let debug = print;;
+let debug = noprint;;
 
 let monster = 100;;
     
index af1d9f944c2757a9dfaf44102847045f2e03403d..f4466fc1a36abb0ebd1a219dfe7eaf3b5444acd2 100644 (file)
@@ -14,7 +14,7 @@ open Printf
 let print ?(depth=0) s = 
   prerr_endline (String.make depth '\t'^Lazy.force s) 
 let noprint ?(depth=0) _ = () 
-let debug_print = print
+let debug_print = noprint
 
 open Continuationals.Stack
 open NTacStatus