aboutsummaryrefslogtreecommitdiffhomepage
path: root/pretyping/constr_matching.mli
diff options
context:
space:
mode:
authorGravatar Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr>2016-11-06 19:59:28 +0100
committerGravatar Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr>2017-02-14 17:26:34 +0100
commit258c8502eafd3e078a5c7478a452432b5c046f71 (patch)
treed4ce21b23a67056242410fbd78362213700af099 /pretyping/constr_matching.mli
parent77e638121b6683047be915da9d0499a58fcb6e52 (diff)
Constr_matching API using EConstr.
Diffstat (limited to 'pretyping/constr_matching.mli')
-rw-r--r--pretyping/constr_matching.mli3
1 files changed, 2 insertions, 1 deletions
diff --git a/pretyping/constr_matching.mli b/pretyping/constr_matching.mli
index ee6c5141b..32bb48c93 100644
--- a/pretyping/constr_matching.mli
+++ b/pretyping/constr_matching.mli
@@ -10,6 +10,7 @@
open Names
open Term
+open EConstr
open Environ
open Pattern
@@ -63,7 +64,7 @@ val matches_conv : env -> Evd.evar_map -> constr_pattern -> constr -> patvar_map
(whose hole is denoted here with [special_meta]) *)
type matching_result =
{ m_sub : bound_ident_map * patvar_map;
- m_ctx : constr }
+ m_ctx : Constr.t }
(** [match_subterm n pat c] returns the substitution and the context
corresponding to each **closed** subterm of [c] matching [pat]. *)