diff options
| author |  Cyprien Mangin <cyprien.mangin@m4x.org> | 2015-06-04 14:35:07 +0200 |
|---|---|---|
| committer |  Matthieu Sozeau <matthieu.sozeau@inria.fr> | 2015-06-12 15:11:02 +0200 |
| commit | 41d63ab4c702457556d2a0680940d04cd4e33179 (patch) | |
| tree | 80ccfc1e28e2dc11cce53ba40088dc0f57ff39a3 /theories | |
| parent | 791ea717a0ac2150f1ce0d74c9794463abe0a01c (diff) | |
The "on_last_hyp" tactic now behaves as it should.
Diffstat (limited to 'theories')
| -rw-r--r-- | theories/Program/Tactics.v | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/theories/Program/Tactics.v b/theories/Program/Tactics.v index 0cf8d7337..c1d958b9d 100644 --- a/theories/Program/Tactics.v +++ b/theories/Program/Tactics.v @@ -41,7 +41,7 @@ Ltac do_nat n tac := (** Do something on the last hypothesis, or fail *) Ltac on_last_hyp tac := - match goal with [ H : _ |- _ ] => first [ tac H | fail 1 ] end. + lazymatch goal with [ H : _ |- _ ] => tac H end. (** Destructs one pair, without care regarding naming. *) |