diff options
Diffstat (limited to 'test-suite/output/Tactics.v')
-rw-r--r-- | test-suite/output/Tactics.v | 12 |
1 files changed, 11 insertions, 1 deletions
diff --git a/test-suite/output/Tactics.v b/test-suite/output/Tactics.v index a7c497cf..75b66e46 100644 --- a/test-suite/output/Tactics.v +++ b/test-suite/output/Tactics.v @@ -7,7 +7,17 @@ Ltac f H := split; [a H|e H]. Print Ltac f. (* Test printing of match context *) -(* Used to fail after translator removal (see bug #1070) *) +(* Used to fail after translator removal (see BZ#1070) *) Ltac g := match goal with |- context [if ?X then _ else _ ] => case X end. Print Ltac g. + +(* Test an error message (BZ#5390) *) +Lemma myid (P : Prop) : P <-> P. +Proof. split; auto. Qed. + +Goal True -> (True /\ True) -> True. +Proof. +intros H. +Fail intros [H%myid ?]. +Fail destruct 1 as [H%myid ?]. |