diff options
| author | Pierre-Marie Pédrot | 2020-04-30 15:57:54 +0200 |
|---|---|---|
| committer | Pierre-Marie Pédrot | 2020-05-03 13:09:49 +0200 |
| commit | 1109581ba7afca804515fc6179565da808bae4f7 (patch) | |
| tree | fe6941fcf9e44d60f2902cb5f732fe6a80955ea9 /proofs/refiner.ml | |
| parent | 04a8c766a51b17997d8a9ffcf6f2d7beffc599ce (diff) | |
Wrap Refiner.refiner in the tactic monad.
This function was used almost everywhere with the wrapper around.
Diffstat (limited to 'proofs/refiner.ml')
| -rw-r--r-- | proofs/refiner.ml | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/proofs/refiner.ml b/proofs/refiner.ml index 75c3436cf4..6a0ba30bbf 100644 --- a/proofs/refiner.ml +++ b/proofs/refiner.ml @@ -37,6 +37,8 @@ let refiner ~check = CProfile.profile2 refiner_key (refiner ~check) else refiner ~check +let refiner ~check c = Proofview.V82.tactic (refiner ~check c) + (*********************) (* Tacticals *) (*********************) |