aboutsummaryrefslogtreecommitdiff
path: root/pretyping
diff options
context:
space:
mode:
authorppedrot2013-10-28 13:32:26 +0000
committerppedrot2013-10-28 13:32:26 +0000
commite2f74e1febf60aaae104ef077e40985b4cf19f5f (patch)
tree4b8c36ccbefc109ae848c1b0b5c766dd1c54882c /pretyping
parent257e3a047456f579b4d3ed8e115aa5e891a1cd5c (diff)
Removing Evd.undefined_evars.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@16942 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'pretyping')
-rw-r--r--pretyping/evd.ml2
-rw-r--r--pretyping/evd.mli3
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