aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorPierre-Marie Pédrot2020-09-04 09:48:07 +0200
committerPierre-Marie Pédrot2020-09-04 22:48:15 +0200
commitbe494f51ec316f0e0af424d3febc1bd100112040 (patch)
tree759bf17cef29c80fc967db0b228d02e79e80fa98
parent31a9ad12f02c50c04dc9d125863a550f70f84dbb (diff)
Remove a unused function from the Clenv API.
-rw-r--r--proofs/clenv.ml3
-rw-r--r--proofs/clenv.mli1
2 files changed, 0 insertions, 4 deletions
diff --git a/proofs/clenv.ml b/proofs/clenv.ml
index 8e3cab70ea..4893758ab3 100644
--- a/proofs/clenv.ml
+++ b/proofs/clenv.ml
@@ -618,9 +618,6 @@ let clenv_cast_meta clenv =
in
crec
-let clenv_value_cast_meta clenv =
- clenv_cast_meta clenv (clenv_value clenv)
-
let clenv_pose_dependent_evars ?(with_evars=false) clenv =
let dep_mvs = clenv_dependent clenv in
let env, sigma = clenv.env, clenv.evd in
diff --git a/proofs/clenv.mli b/proofs/clenv.mli
index 43e808dac7..d4905de434 100644
--- a/proofs/clenv.mli
+++ b/proofs/clenv.mli
@@ -99,7 +99,6 @@ val unify : ?flags:unify_flags -> constr -> unit Proofview.tactic
val res_pf : ?with_evars:bool -> ?with_classes:bool -> ?flags:unify_flags -> clausenv -> unit Proofview.tactic
val clenv_pose_dependent_evars : ?with_evars:bool -> clausenv -> clausenv
-val clenv_value_cast_meta : clausenv -> constr
(** {6 Pretty-print (debug only) } *)
val pr_clenv : clausenv -> Pp.t