diff options
author | 2017-08-29 14:45:47 +0200 | |
---|---|---|
committer | 2017-08-29 14:45:47 +0200 | |
commit | 7caaf8d434499feb1c3b3c86ad1538905fc34d3f (patch) | |
tree | b83067ea7085d119593fce282a7bf756de402825 /API | |
parent | c3bc1fda9c5dd1805b23d04f2dee711aeec1f4a1 (diff) | |
parent | 569a26809a3b5e72033aac29e9e2bc91f74f2092 (diff) |
Merge PR #946: Functional pretyping interface
Diffstat (limited to 'API')
-rw-r--r-- | API/API.mli | 13 |
1 files changed, 4 insertions, 9 deletions
diff --git a/API/API.mli b/API/API.mli index e7a434634..a90f8f84c 100644 --- a/API/API.mli +++ b/API/API.mli @@ -4017,18 +4017,11 @@ sig expand_evars : bool } - type pure_open_constr = Evd.evar_map * EConstr.constr - type glob_constr_ltac_closure = Glob_term.ltac_var_map * Glob_term.glob_constr - val understand_ltac : inference_flags -> Environ.env -> Evd.evar_map -> Glob_term.ltac_var_map -> - typing_constraint -> Glob_term.glob_constr -> pure_open_constr + typing_constraint -> Glob_term.glob_constr -> Evd.evar_map * EConstr.t val understand_tcc : ?flags:inference_flags -> Environ.env -> Evd.evar_map -> ?expected_type:typing_constraint -> Glob_term.glob_constr -> Evd.evar_map * EConstr.constr - val type_uconstr : - ?flags:inference_flags -> - ?expected_type:typing_constraint -> - Geninterp.interp_sign -> Glob_term.closed_glob_constr -> EConstr.constr Tactypes.delayed_open val understand : ?flags:inference_flags -> ?expected_type:typing_constraint -> Environ.env -> Evd.evar_map -> Glob_term.glob_constr -> Constr.t Evd.in_evar_universe_context val check_evars : Environ.env -> Evd.evar_map -> Evd.evar_map -> EConstr.constr -> unit @@ -4387,8 +4380,10 @@ end module Evar_refiner : sig + type glob_constr_ltac_closure = Glob_term.ltac_var_map * Glob_term.glob_constr + val w_refine : Evar.t * Evd.evar_info -> - Pretyping.glob_constr_ltac_closure -> Evd.evar_map -> Evd.evar_map + glob_constr_ltac_closure -> Evd.evar_map -> Evd.evar_map end |