diff options
Diffstat (limited to 'pretyping')
| -rw-r--r-- | pretyping/evd.ml | 2 | ||||
| -rw-r--r-- | pretyping/evd.mli | 3 |
2 files changed, 0 insertions, 5 deletions
diff --git a/pretyping/evd.ml b/pretyping/evd.ml index 189408a981..f2380e17f0 100644 --- a/pretyping/evd.ml +++ b/pretyping/evd.ml @@ -357,8 +357,6 @@ let to_list d = let undefined_map d = d.undf_evars -let undefined_evars d = { d with defn_evars = EvMap.empty } - (* spiwack: not clear what folding over an evar_map, for now we shall simply fold over the inner evar_map. *) let fold f d a = diff --git a/pretyping/evd.mli b/pretyping/evd.mli index 17e9dedafa..ec16f53b76 100644 --- a/pretyping/evd.mli +++ b/pretyping/evd.mli @@ -229,9 +229,6 @@ val evars_reset_evd : ?with_conv_pbs:bool -> evar_map -> evar_map -> evar_map (** {6 Misc} *) -val undefined_evars : evar_map -> evar_map -(** TODO: see where we can replace those functions by their [_map] variant. *) - val evar_declare : named_context_val -> evar -> types -> ?src:Loc.t * Evar_kinds.t -> ?filter:Filter.t -> ?candidates:constr list -> evar_map -> evar_map |