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 /tactics/tactics.ml | |
| parent | f499083e65ba629e0232fad3f3bbc7fe21d9da2f (diff) | |
Remove Refiner.refiner.
Diffstat (limited to 'tactics/tactics.ml')
| -rw-r--r-- | tactics/tactics.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tactics/tactics.ml b/tactics/tactics.ml index 3133f9be1e..eb7f2190a8 100644 --- a/tactics/tactics.ml +++ b/tactics/tactics.ml @@ -1383,7 +1383,7 @@ let clenv_refine_in ?err with_evars targetid id sigma0 clenv tac = if not with_evars && occur_meta clenv.evd new_hyp_typ then error_uninstantiated_metas new_hyp_typ clenv; let new_hyp_prf = clenv_value clenv in - let exact_tac = Refiner.refiner ~check:false EConstr.Unsafe.(to_constr new_hyp_prf) in + let exact_tac = Logic.refiner ~check:false EConstr.Unsafe.(to_constr new_hyp_prf) in let naming = NamingMustBe (CAst.make targetid) in let with_clear = do_replace (Some id) naming in Tacticals.New.tclTHEN |