diff options
| author |  Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr> | 2014-06-12 15:04:06 +0200 |
|---|---|---|
| committer | Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr> | 2014-06-12 15:20:36 +0200 |
| commit | bda7852cb0896727389935f420eec0e8e3315cf7 (patch) | |
| tree | dc03858224a7dfbd3b92c0aee016356ab9dda6ce /plugins/rtauto | |
| parent | a4db087565dd2ecfa3bcc022277bed1a3c868fd3 (diff) | |
Passing some tactics to the new monad type.
Diffstat (limited to 'plugins/rtauto')
| -rw-r--r-- | plugins/rtauto/refl_tauto.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/plugins/rtauto/refl_tauto.ml b/plugins/rtauto/refl_tauto.ml index bff574a06..6b4be4e2a 100644 --- a/plugins/rtauto/refl_tauto.ml +++ b/plugins/rtauto/refl_tauto.ml @@ -313,7 +313,7 @@ let rtauto_tac gls= let tac_start_time = System.get_time () in let result= if !check then - Tactics.exact_check term gls + Proofview.V82.of_tactic (Tactics.exact_check term) gls else Tactics.exact_no_check term gls in let tac_end_time = System.get_time () in |