From 056c7c4c33ca20c3185f09fedb9e963cd440907b Mon Sep 17 00:00:00 2001
From: aspiwack
Date: Sat, 2 Nov 2013 15:40:46 +0000
Subject: Refine now does iota reduction in addition to beta.

Restores more compatibility with the earlier implementation of refine. Needed in ssreflect.

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

diff --git a/tactics/tactics.ml b/tactics/tactics.ml
index c933ec44e6..0bf295b3cb 100644
--- a/tactics/tactics.ml
+++ b/tactics/tactics.ml
@@ -3880,7 +3880,7 @@ module New = struct
     Proofview.Goal.lift c >>= fun c ->
     Proofview.tclSENSITIVE (Goal.refine c) <*>
     Proofview.V82.tactic (reduce
-       (Lazy {rBeta=true;rIota=false;rZeta=false;rDelta=false;rConst=[]})
+       (Lazy {rBeta=true;rIota=true;rZeta=false;rDelta=false;rConst=[]})
        {onhyps=None; concl_occs=AllOccurrences }
     )
 
-- 
cgit v1.2.3