diff options
| author | Pierre-Marie Pédrot | 2020-06-26 12:36:43 +0200 |
|---|---|---|
| committer | Pierre-Marie Pédrot | 2020-06-29 15:16:21 +0200 |
| commit | e5b355107d985d7efe2976b9eee9b6c182e25f24 (patch) | |
| tree | f17d55f201d22a067688524dab2f56f7d2f5ef8a /proofs | |
| parent | f499083e65ba629e0232fad3f3bbc7fe21d9da2f (diff) | |
Remove Refiner.refiner.
Diffstat (limited to 'proofs')
| -rw-r--r-- | proofs/refiner.ml | 2 | ||||
| -rw-r--r-- | proofs/refiner.mli | 2 |
2 files changed, 0 insertions, 4 deletions
diff --git a/proofs/refiner.ml b/proofs/refiner.ml index 3c6a5d1694..8e413c7a88 100644 --- a/proofs/refiner.ml +++ b/proofs/refiner.ml @@ -21,8 +21,6 @@ let project x = x.sigma let pf_env gls = Global.env_of_context (Goal.V82.hyps (project gls) (sig_it gls)) let pf_hyps gls = EConstr.named_context_of_val (Goal.V82.hyps (project gls) (sig_it gls)) -let refiner = Logic.refiner - (* A special exception for levels for the Fail tactic *) exception FailError of int * Pp.t Lazy.t diff --git a/proofs/refiner.mli b/proofs/refiner.mli index 0ea630fdbc..18ac5f4a76 100644 --- a/proofs/refiner.mli +++ b/proofs/refiner.mli @@ -22,8 +22,6 @@ val project : 'a sigma -> evar_map val pf_env : Goal.goal sigma -> Environ.env val pf_hyps : Goal.goal sigma -> named_context -val refiner : check:bool -> Constr.t -> unit Proofview.tactic - (** A special exception for levels for the Fail tactic *) exception FailError of int * Pp.t Lazy.t |