diff options
| author |  Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr> | 2016-09-15 18:11:54 +0200 |
|---|---|---|
| committer | Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr> | 2016-09-15 19:07:34 +0200 |
| commit | 72ac4b32ac26fdba751ae48568d28b4dbb8edd14 (patch) | |
| tree | 26ecc0cc236423fac993258cfc6a1252ea5ed0ee /pretyping/pretyping.mli | |
| parent | 1d432a8e7a2e728f0dbf909f95337f0ff2c33945 (diff) | |
Untangling Tacexpr from lower strata.
Diffstat (limited to 'pretyping/pretyping.mli')
| -rw-r--r-- | pretyping/pretyping.mli | 7 |
1 files changed, 1 insertions, 6 deletions
diff --git a/pretyping/pretyping.mli b/pretyping/pretyping.mli index 7cb256e4f..f015813af 100644 --- a/pretyping/pretyping.mli +++ b/pretyping/pretyping.mli @@ -55,11 +55,6 @@ type inference_flags = { expand_evars : bool } -type 'a delayed_open = - { delayed : 'r. Environ.env -> 'r Sigma.t -> ('a, 'r) Sigma.sigma } - -type delayed_open_constr = constr delayed_open - val default_inference_flags : bool -> inference_flags val no_classes_no_fail_inference_flags : inference_flags @@ -122,7 +117,7 @@ val understand_judgment_tcc : env -> evar_map ref -> val type_uconstr : ?flags:inference_flags -> ?expected_type:typing_constraint -> - Geninterp.interp_sign -> Glob_term.closed_glob_constr -> constr delayed_open + Geninterp.interp_sign -> Glob_term.closed_glob_constr -> constr Tactypes.delayed_open (** Trying to solve remaining evars and remaining conversion problems possibly using type classes, heuristics, external tactic solver |