...

diff --git a/helm/ocaml/paramodulation/indexing.ml b/helm/ocaml/paramodulation/indexing.ml
index 3361f5a3b7351fe93f0531d2de5015e947586073..8ced5388922fe31e384c80a9efa5ec5860a487c9 100644 (file)
--- a/helm/ocaml/paramodulation/indexing.ml
+++ b/helm/ocaml/paramodulation/indexing.ml
@@ -1029,13 +1029,13 @@ let rec demodulation_goal newmeta env table goal =
         in
         match proof with
         | Inference.NoProof ->
-            debug_print "replacing a NoProof";
+            debug_print (lazy "replacing a NoProof");
             pb
         | Inference.BasicProof _ ->
-            debug_print "replacing a BasicProof";
+            debug_print (lazy "replacing a BasicProof");
             pb
         | Inference.ProofGoalBlock (_, parent_proof) ->
-            debug_print "replacing another ProofGoalBlock";
+            debug_print (lazy "replacing another ProofGoalBlock");
             Inference.ProofGoalBlock (pb, parent_proof)
         | _ -> assert false
       in