diff options
| author | Maxime Dénès | 2016-06-27 12:32:03 +0200 |
|---|---|---|
| committer | Maxime Dénès | 2016-06-27 12:32:03 +0200 |
| commit | c1caa158add73e6e6028ade81a0cb4540a845d18 (patch) | |
| tree | e6cd36fc03ae7a79d9b65f08b0295bedc485f855 /interp/constrexpr_ops.mli | |
| parent | a553126c9e0984f38b1a15f2db60458813a177c9 (diff) | |
| parent | c6d9d4fb142ef42634be25b60c0995b541e86629 (diff) | |
Merge branch 'funpattern' into trunk. Was PR#142: Binder syntax.
Diffstat (limited to 'interp/constrexpr_ops.mli')
| -rw-r--r-- | interp/constrexpr_ops.mli | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/interp/constrexpr_ops.mli b/interp/constrexpr_ops.mli index 3f5be48559..a92da035f6 100644 --- a/interp/constrexpr_ops.mli +++ b/interp/constrexpr_ops.mli @@ -58,6 +58,11 @@ val mkCLambdaN : Loc.t -> local_binder list -> constr_expr -> constr_expr val mkCProdN : Loc.t -> local_binder list -> constr_expr -> constr_expr (** Same as [prod_constr_expr], with location *) +val fresh_var_hook : (Names.Id.t list -> Constrexpr.constr_expr -> Names.Id.t) Hook.t +val expand_pattern_binders : + (Loc.t -> local_binder list -> constr_expr -> constr_expr) -> + local_binder list -> constr_expr -> local_binder list * constr_expr + (** {6 Destructors}*) val coerce_reference_to_id : reference -> Id.t |