From 8cd8d04863acf4e3d4673a62fede16fba1a87435 Mon Sep 17 00:00:00 2001
From: herbelin
Date: Thu, 18 May 2000 16:58:16 +0000
Subject: ciseaux

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

diff --git a/tactics/wcclausenv.ml b/tactics/wcclausenv.ml
index 7cdd5c1fe5..312e3a34ed 100644
--- a/tactics/wcclausenv.ml
+++ b/tactics/wcclausenv.ml
@@ -144,8 +144,6 @@ 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))) -> 
-        build_term ce (na,Some t) mkExistential
-    | ((na,Some t), (DOP0(XTRA("ISEVAR")))) ->
     	let mv = new_meta() in 
 	(DOP0(Meta mv),
          clenv_pose (na,mv,t) ce)
-- 
cgit v1.2.3