From bfb2e68ff5587b71de525584deab04d4169d29d7 Mon Sep 17 00:00:00 2001
From: herbelin
Date: Wed, 29 Aug 2007 13:09:36 +0000
Subject: - Débogueur: positionnement de set_detype_anonymous pour ne pas  
 échouer sur les Rel liées a des Anonymous et export de l'instance   des evars
 vers le printeur du débogueur. - Suppression d'un reste de code mort lié à la
 V7 dans pretyping.ml.

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

(limited to 'contrib')

diff --git a/contrib/subtac/subtac_utils.ml b/contrib/subtac/subtac_utils.ml
index 2335d3a253..9ebb8774b4 100644
--- a/contrib/subtac/subtac_utils.ml
+++ b/contrib/subtac/subtac_utils.ml
@@ -163,7 +163,7 @@ let make_existential loc ?(opaque = true) env isevars c =
 
 let make_existential_expr loc env c =
   let key = Evarutil.new_untyped_evar () in
-  let evar = Topconstr.CEvar (loc, key) in
+  let evar = Topconstr.CEvar (loc, key, None) in
     debug 2 (str "Constructed evar " ++ int key);
     evar
 
-- 
cgit v1.2.3