diff options
| author |  Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr> | 2016-05-16 21:14:12 +0200 |
|---|---|---|
| committer | Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr> | 2016-05-16 21:17:25 +0200 |
| commit | 1394bab8ba40dd4714e941586109fd88a79ef653 (patch) | |
| tree | fa07c5843d8d04c27e755374dbda357552a9f59f /ltac | |
| parent | 9ae9ac00b6882a9918eea3cb7d809424695d37ff (diff) | |
Put the "*_cast_no_check" tactics in the monad.
Diffstat (limited to 'ltac')
| -rw-r--r-- | ltac/coretactics.ml4 | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/ltac/coretactics.ml4 b/ltac/coretactics.ml4 index 3849a8440..4893e4097 100644 --- a/ltac/coretactics.ml4 +++ b/ltac/coretactics.ml4 @@ -43,11 +43,11 @@ TACTIC EXTEND exact_no_check END TACTIC EXTEND vm_cast_no_check - [ "vm_cast_no_check" constr(c) ] -> [ Proofview.V82.tactic (Tactics.vm_cast_no_check c) ] + [ "vm_cast_no_check" constr(c) ] -> [ Tactics.vm_cast_no_check c ] END TACTIC EXTEND native_cast_no_check - [ "native_cast_no_check" constr(c) ] -> [ Proofview.V82.tactic (Tactics.native_cast_no_check c) ] + [ "native_cast_no_check" constr(c) ] -> [ Tactics.native_cast_no_check c ] END TACTIC EXTEND casetype |