From c743a5a6e5fb689c25202c635128ebc812c046df Mon Sep 17 00:00:00 2001
From: msozeau
Date: Wed, 28 Jul 2010 17:55:35 +0000
Subject: Fix bug #2209, don't use the fragile argument name "y" to pass the
 missing argument to a transitivity call.

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

diff --git a/tactics/rewrite.ml4 b/tactics/rewrite.ml4
index 6a81f9ada9..c792367c3b 100644
--- a/tactics/rewrite.ml4
+++ b/tactics/rewrite.ml4
@@ -1648,8 +1648,7 @@ let setoid_transitivity c gl =
       let proof = get_transitive_proof env evm car rel in
       match c with
       | None -> eapply proof
-      | Some c ->
-	  apply_with_bindings (proof,Rawterm.ExplicitBindings [ dummy_loc, Rawterm.NamedHyp (id_of_string "y"), c ]))
+      | Some c -> apply_with_bindings (proof,Rawterm.ImplicitBindings [ c ]))
     (transitivity_red true c)
 
 let setoid_symmetry_in id gl =
-- 
cgit v1.2.3