aboutsummaryrefslogtreecommitdiff
path: root/pretyping/recordops.mli
diff options
context:
space:
mode:
authorPierre-Marie Pédrot2017-08-22 21:05:59 +0200
committerPierre-Marie Pédrot2017-10-17 12:50:44 +0200
commit1a58e205e79ca2fd0a40b014e929c180e5ff57eb (patch)
tree154e97a53231d810f3dfb5d461e37b5bf2e5b342 /pretyping/recordops.mli
parent8764f77d807ff9d3f6260b657865ad0f40248cab (diff)
Properly handling projection parameters in canonical structures.
Diffstat (limited to 'pretyping/recordops.mli')
-rw-r--r--pretyping/recordops.mli2
1 files changed, 1 insertions, 1 deletions
diff --git a/pretyping/recordops.mli b/pretyping/recordops.mli
index 5480b14af0..8e2333b349 100644
--- a/pretyping/recordops.mli
+++ b/pretyping/recordops.mli
@@ -65,7 +65,7 @@ type obj_typ = {
o_TCOMPS : constr list } (** ordered *)
(** Return the form of the component of a canonical structure *)
-val cs_pattern_of_constr : constr -> cs_pattern * int option * constr list
+val cs_pattern_of_constr : Environ.env -> constr -> cs_pattern * int option * constr list
val pr_cs_pattern : cs_pattern -> Pp.t