diff options
| author | Matthieu Sozeau | 2014-06-17 15:22:18 +0200 |
|---|---|---|
| committer | Matthieu Sozeau | 2014-06-17 15:42:15 +0200 |
| commit | 362e81735b07f96cb87e1203328592fc394beaad (patch) | |
| tree | 2e6f9e9030f220ef5650d533690b73c3feba5dce /pretyping | |
| parent | 2b7bede68c213fbb884c773c073ba31a886f41f4 (diff) | |
- Fix the de Bruijn problem in check_projection for good :)
- Fix HoTT coq bug #80, implicit arguments with primitive projections were
wrongly automatically infered.
Diffstat (limited to 'pretyping')
| -rw-r--r-- | pretyping/cases.mli | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/pretyping/cases.mli b/pretyping/cases.mli index 70fa945ff1..d875edd796 100644 --- a/pretyping/cases.mli +++ b/pretyping/cases.mli @@ -110,3 +110,14 @@ type 'a pattern_matching_problem = val compile : 'a pattern_matching_problem -> Environ.unsafe_judgment + +val prepare_predicate : Loc.t -> + (Evarutil.type_constraint -> + Environ.env -> Evd.evar_map ref -> 'a -> Environ.unsafe_judgment) -> + Evd.evar_map -> + Environ.env -> + (Term.types * tomatch_type) list -> + Context.rel_context list -> + Constr.constr option -> + 'a option -> (Evd.evar_map * Names.name list * Term.constr) list + |