From b820ff40cb8053df01ac422f36d5f3520727b5c6 Mon Sep 17 00:00:00 2001
From: herbelin
Date: Fri, 19 Dec 2003 18:20:53 +0000
Subject: Substitution dans REvar et PEvar plutot que encodage via noeud
 application pour eviter la confusion avec la (vraie) application

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

(limited to 'pretyping/pattern.mli')

diff --git a/pretyping/pattern.mli b/pretyping/pattern.mli
index f05a08659f..7a3b9127d7 100644
--- a/pretyping/pattern.mli
+++ b/pretyping/pattern.mli
@@ -33,7 +33,7 @@ val patvar_of_int_v7 : int -> patvar
 type constr_pattern =
   | PRef of global_reference
   | PVar of identifier
-  | PEvar of existential_key
+  | PEvar of existential_key * constr_pattern array
   | PRel of int
   | PApp of constr_pattern * constr_pattern array
   | PSoApp of patvar * constr_pattern list
-- 
cgit v1.2.3