From 58630ad9a0b94a804a39a3d99f982965292692c7 Mon Sep 17 00:00:00 2001
From: Emilio Jesus Gallego Arias
Date: Mon, 21 May 2018 23:54:55 +0200
Subject: [api] Misctypes removal: miscellaneous aliases.

---
 pretyping/pattern.ml | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'pretyping/pattern.ml')

diff --git a/pretyping/pattern.ml b/pretyping/pattern.ml
index 996a2dc36a..519a5466b4 100644
--- a/pretyping/pattern.ml
+++ b/pretyping/pattern.ml
@@ -13,6 +13,9 @@ open Misctypes
 
 (** {5 Patterns} *)
 
+(** Cases pattern variables *)
+type patvar = Id.t
+
 type case_info_pattern =
     { cip_style : Constr.case_style;
       cip_ind : inductive option;
-- 
cgit v1.2.3


From 36a98d55576ebdb106a55c3bd682961da8d77dee Mon Sep 17 00:00:00 2001
From: Emilio Jesus Gallego Arias
Date: Mon, 21 May 2018 23:57:32 +0200
Subject: [api] Misctypes removal: remove dummy alias.

---
 pretyping/pattern.ml | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

(limited to 'pretyping/pattern.ml')

diff --git a/pretyping/pattern.ml b/pretyping/pattern.ml
index 519a5466b4..be7ebe49cf 100644
--- a/pretyping/pattern.ml
+++ b/pretyping/pattern.ml
@@ -9,7 +9,6 @@
 (************************************************************************)
 
 open Names
-open Misctypes
 
 (** {5 Patterns} *)
 
@@ -25,7 +24,7 @@ type case_info_pattern =
 type constr_pattern =
   | PRef of GlobRef.t
   | PVar of Id.t
-  | PEvar of existential_key * constr_pattern array
+  | PEvar of Evar.t * constr_pattern array
   | PRel of int
   | PApp of constr_pattern * constr_pattern array
   | PSoApp of patvar * constr_pattern list
-- 
cgit v1.2.3