diff options
| author | herbelin | 2001-09-21 13:35:27 +0000 |
|---|---|---|
| committer | herbelin | 2001-09-21 13:35:27 +0000 |
| commit | e1bcb3ed3468b7fb010c3e0cacb15174c1f3f37a (patch) | |
| tree | fe146e7794ce340f49525e0d985465777ffccd34 | |
| parent | a948eba3894f8b5351c208e4d12d27ba2902a54f (diff) | |
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
| -rw-r--r-- | proofs/refiner.ml | 5 |
1 files changed, 4 insertions, 1 deletions
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 |