From 391e26950408b9a54fb09b55bbaed6dde4fc208e Mon Sep 17 00:00:00 2001
From: herbelin
Date: Thu, 18 May 2000 17:29:31 +0000
Subject: suppression ligne etrange

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

diff --git a/tactics/wcclausenv.ml b/tactics/wcclausenv.ml
index 312e3a34ed..8a76a0e6fa 100644
--- a/tactics/wcclausenv.ml
+++ b/tactics/wcclausenv.ml
@@ -144,7 +144,7 @@ and build_term ce p_0 p_1 =
   let env = Global.env() in
   match p_0,p_1 with 
     | ((na,Some t), (DOP0(Meta mv))) -> 
-    	let mv = new_meta() in 
+(*    	let mv = new_meta() in *)
 	(DOP0(Meta mv),
          clenv_pose (na,mv,t) ce)
     | ((na,_), (DOP2(Cast,c,t))) -> build_term ce (na,Some t) c
-- 
cgit v1.2.3