diff options
| author | Hugo Herbelin | 2020-09-06 12:29:19 +0200 |
|---|---|---|
| committer | Hugo Herbelin | 2020-09-06 12:29:19 +0200 |
| commit | 48f465dd5c5f9db416a7cd57b0acb86f17323ce3 (patch) | |
| tree | 786abf0914b38c81891a5c7dd831fbbe84a058d5 /proofs | |
| parent | b6e16a06b4b461d9149e6625925b38ff17a8977a (diff) | |
| parent | be494f51ec316f0e0af424d3febc1bd100112040 (diff) | |
Merge PR #12976: Remove clenv chaining in Equality
Reviewed-by: herbelin
Diffstat (limited to 'proofs')
| -rw-r--r-- | proofs/clenv.ml | 3 | ||||
| -rw-r--r-- | proofs/clenv.mli | 1 |
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 |