diff options
| author | herbelin | 2011-12-04 20:48:20 +0000 |
|---|---|---|
| committer | herbelin | 2011-12-04 20:48:20 +0000 |
| commit | 17e99469c656a157f5ab998e21c41294ea2abbf8 (patch) | |
| tree | 4e0d8129a9f09659d91d19a05b2cc5e4d61365f9 /pretyping/evarutil.mli | |
| parent | c9f87fca10b37d15fc943dc4f5d2adb1c3304a3c (diff) | |
Discarding let-ins from the instances of the evars in the
pattern-unification test. They were tolerated up to r14539. Also
expanded the let-ins not bound to rel or var in the right-hand side of
a term for which pattern-unification is tested (this expansion can
refer to a non-let variable that has to be taken into account in the
pattern-unification test).
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@14757 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'pretyping/evarutil.mli')
| -rw-r--r-- | pretyping/evarutil.mli | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/pretyping/evarutil.mli b/pretyping/evarutil.mli index 36e64c9ad2..78898aaa7c 100644 --- a/pretyping/evarutil.mli +++ b/pretyping/evarutil.mli @@ -96,10 +96,10 @@ val define_evar_as_product : evar_map -> existential -> evar_map * types val define_evar_as_lambda : env -> evar_map -> existential -> evar_map * types val define_evar_as_sort : evar_map -> existential -> evar_map * sorts -val is_unification_pattern_evar : env -> existential -> constr list -> +val is_unification_pattern_evar : env -> evar_map -> existential -> constr list -> constr -> constr list option -val is_unification_pattern : env * int -> constr -> constr list -> +val is_unification_pattern : env * int -> evar_map -> constr -> constr list -> constr -> constr list option val evar_absorb_arguments : env -> evar_map -> existential -> constr list -> |