diff options
| author |  Maxime Dénès <mail@maximedenes.fr> | 2017-12-22 10:11:59 +0100 |
|---|---|---|
| committer | Maxime Dénès <mail@maximedenes.fr> | 2017-12-22 10:11:59 +0100 |
| commit | 483d90887aa53dbb8ae44c35ca77ad802a1d1bd1 (patch) | |
| tree | 5faf763efcc920cfd3b312c85281b79e74137dbe /engine/evarutil.mli | |
| parent | 2ded75b9b51aa9607cf2a123d6f8ae42a141e97a (diff) | |
| parent | 8eea5a5ecdd33d85e4e7d42408360fff68e04f5d (diff) | |
Merge PR #6222: Share computation of unifiable evars
Diffstat (limited to 'engine/evarutil.mli')
| -rw-r--r-- | engine/evarutil.mli | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/engine/evarutil.mli b/engine/evarutil.mli index 9d0b973a7..37f5968ad 100644 --- a/engine/evarutil.mli +++ b/engine/evarutil.mli @@ -133,6 +133,12 @@ val undefined_evars_of_term : evar_map -> constr -> Evar.Set.t val undefined_evars_of_named_context : evar_map -> Context.Named.t -> Evar.Set.t val undefined_evars_of_evar_info : evar_map -> evar_info -> Evar.Set.t +type undefined_evars_cache + +val create_undefined_evars_cache : unit -> undefined_evars_cache + +val filtered_undefined_evars_of_evar_info : ?cache:undefined_evars_cache -> evar_map -> evar_info -> Evar.Set.t + (** [occur_evar_upto sigma k c] returns [true] if [k] appears in [c]. It looks up recursively in [sigma] for the value of existential variables. *) |