From d9b82a2d4a9e310f9f0cd907e71bc6a57bf03efd Mon Sep 17 00:00:00 2001
From: herbelin
Date: Sun, 6 Nov 2011 11:55:42 +0000
Subject: Fixing tactic remember not correctly checking preservation of typing
 in hypotheses.

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@14638 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 tactics/tactics.ml | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'tactics')

diff --git a/tactics/tactics.ml b/tactics/tactics.ml
index 4022af6d94..cddb7a2b29 100644
--- a/tactics/tactics.ml
+++ b/tactics/tactics.ml
@@ -1768,8 +1768,8 @@ let letin_tac_gen with_eq name (sigmac,c) test ty occs gl =
   tclTHENLIST
     [ convert_concl_no_check newcl DEFAULTcast;
       intro_gen dloc (IntroMustBe id) lastlhyp true false;
-      eq_tac;
-      tclMAP convert_hyp_no_check depdecls ] gl
+      tclMAP convert_hyp_no_check depdecls;
+      eq_tac ] gl
 
 let make_eq_test c = (make_eq_test c,fun _ -> c)
 
-- 
cgit v1.2.3