diff options
| author | Pierre-Marie Pédrot | 2020-06-17 15:10:32 +0200 |
|---|---|---|
| committer | Pierre-Marie Pédrot | 2020-06-24 15:38:24 +0200 |
| commit | 34aeda3d701efd5dead8890588fb02bcdb4980d2 (patch) | |
| tree | 9330fb20e4e7d95bac5d1550f4340bfed73efd67 /tactics/eauto.ml | |
| parent | b89584b989d8623a63e85b4a664a730d0f92ed65 (diff) | |
Merge Clenvtac into Clenv.
Having two different modules led to the availability of internal API in
the mli.
Diffstat (limited to 'tactics/eauto.ml')
| -rw-r--r-- | tactics/eauto.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tactics/eauto.ml b/tactics/eauto.ml index 7269228485..d275e15255 100644 --- a/tactics/eauto.ml +++ b/tactics/eauto.ml @@ -37,7 +37,7 @@ let e_give_exact ?(flags=eauto_unif_flags) c = if occur_existential sigma t1 || occur_existential sigma t2 then Tacticals.New.tclTHENLIST [Proofview.Unsafe.tclEVARS sigma; - Clenvtac.unify ~flags t1; + Clenv.unify ~flags t1; exact_no_check c] else exact_check c end @@ -68,7 +68,7 @@ open Auto let unify_e_resolve flags h = Proofview.Goal.enter begin fun gl -> let clenv', c = connect_hint_clenv h gl in - Clenvtac.res_pf ~with_evars:true ~with_classes:true ~flags clenv' + Clenv.res_pf ~with_evars:true ~with_classes:true ~flags clenv' end let hintmap_of sigma secvars concl = |