diff options
| author |  bertot <bertot@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2002-01-23 14:17:57 +0000 |
|---|---|---|
| committer | bertot <bertot@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2002-01-23 14:17:57 +0000 |
| commit | bef4e9e5842527ffc76c0ae9635a2188fd09602a (patch) | |
| tree | 688ef63f0f2bf4f9eee216be7e955c6d27e78d53 /contrib/interface/showproof_ct.ml | |
| parent | 58c4a23cc2d7b01bbc6a7e60d6d074bb0a0e5b26 (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.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/contrib/interface/showproof_ct.ml b/contrib/interface/showproof_ct.ml index b689620e3..ee901c5e7 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 ;; |