From e1bcb3ed3468b7fb010c3e0cacb15174c1f3f37a Mon Sep 17 00:00:00 2001
From: herbelin
Date: Fri, 21 Sep 2001 13:35:27 +0000
Subject: Problème d'affichage d'un . pour les Local_constraints; remplacement
 par Idtac

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@2047 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 proofs/refiner.ml | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/proofs/refiner.ml b/proofs/refiner.ml
index 4ca9a06158..e8d1574da2 100644
--- a/proofs/refiner.ml
+++ b/proofs/refiner.ml
@@ -799,7 +799,10 @@ let pr_rule = function
   | Context ctxt -> pr_ctxt ctxt
   | Local_constraints lc ->
       (* This is internal tactic and cannot be replayed at user-level *)
-      [< (* 'sTR"Local constraint change" *) >]
+      (* [< 'sTR"Local constraint change" >] *)
+      (* Use Idtac instead *)
+      (* To put nothing does not work, because it still writes a single dot *)
+      [< 'sTR"Idtac" >]
 
 exception Different
 
-- 
cgit v1.2.3