From e4f066238799a4598817dfeab8a044760ab670de Mon Sep 17 00:00:00 2001
From: Pierre-Marie Pédrot
Date: Mon, 7 Nov 2016 20:33:06 +0100
Subject: Coercion API using EConstr.

---
 pretyping/program.mli | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'pretyping/program.mli')

diff --git a/pretyping/program.mli b/pretyping/program.mli
index 023ff8ca58..64c4ca2c24 100644
--- a/pretyping/program.mli
+++ b/pretyping/program.mli
@@ -36,7 +36,7 @@ val mk_coq_and : constr list -> constr
 val mk_coq_not : constr -> constr
 
 (** Polymorphic application of delayed references *)
-val papp : Evd.evar_map ref -> (unit -> global_reference) -> constr array -> constr
+val papp : Evd.evar_map ref -> (unit -> global_reference) -> EConstr.constr array -> EConstr.constr
 
 val get_proofs_transparency : unit -> bool
 val is_program_cases : unit -> bool
-- 
cgit v1.2.3


From 67dc22d8389234d0c9b329944ff579e7056b7250 Mon Sep 17 00:00:00 2001
From: Pierre-Marie Pédrot
Date: Tue, 8 Nov 2016 10:57:05 +0100
Subject: Cases API using EConstr.

---
 pretyping/program.mli | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'pretyping/program.mli')

diff --git a/pretyping/program.mli b/pretyping/program.mli
index 64c4ca2c24..94a7bdcb6d 100644
--- a/pretyping/program.mli
+++ b/pretyping/program.mli
@@ -6,7 +6,7 @@
 (*         *       GNU Lesser General Public License Version 2.1        *)
 (************************************************************************)
 
-open Term
+open EConstr
 open Globnames
 
 (** A bunch of Coq constants used by Progam *)
@@ -36,7 +36,7 @@ val mk_coq_and : constr list -> constr
 val mk_coq_not : constr -> constr
 
 (** Polymorphic application of delayed references *)
-val papp : Evd.evar_map ref -> (unit -> global_reference) -> EConstr.constr array -> EConstr.constr
+val papp : Evd.evar_map ref -> (unit -> global_reference) -> constr array -> constr
 
 val get_proofs_transparency : unit -> bool
 val is_program_cases : unit -> bool
-- 
cgit v1.2.3