aboutsummaryrefslogtreecommitdiff
path: root/contrib/interface/showproof_ct.ml
diff options
context:
space:
mode:
authorbertot2002-01-23 14:17:57 +0000
committerbertot2002-01-23 14:17:57 +0000
commitbef4e9e5842527ffc76c0ae9635a2188fd09602a (patch)
tree688ef63f0f2bf4f9eee216be7e955c6d27e78d53 /contrib/interface/showproof_ct.ml
parent58c4a23cc2d7b01bbc6a7e60d6d074bb0a0e5b26 (diff)
In Pcoq, the search commands had an erroneous behavior. Bound variables
in theorems were renamed to avoid the names present in the current goal's context. This version corrects this problem. git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@2425 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'contrib/interface/showproof_ct.ml')
-rw-r--r--contrib/interface/showproof_ct.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/contrib/interface/showproof_ct.ml b/contrib/interface/showproof_ct.ml
index b689620e34..ee901c5e7c 100644
--- a/contrib/interface/showproof_ct.ml
+++ b/contrib/interface/showproof_ct.ml
@@ -52,7 +52,7 @@ let stde() = (Global.env())
;;
let spt t =
- let f = (translate_constr (stde()) t) in
+ let f = (translate_constr true (stde()) t) in
Hashtbl.add ct_FORMULA_constr f t;
CT_text_formula f
;;