diff options
| author | Tej Chajed | 2017-12-11 11:37:50 -0500 |
|---|---|---|
| committer | Tej Chajed | 2017-12-11 14:03:37 -0500 |
| commit | 761dcf2355ac673b6fefe319fcbab907b1e8ec2d (patch) | |
| tree | 1883bb4b31e98998189425b84d7994d05b26b864 /test-suite/bugs | |
| parent | a77f3a3e076e273af35ad520cae2eef0e3552811 (diff) | |
Catch errors while coercing 'and' intro patterns
Fixes GH#6384 and GH#6385.
Diffstat (limited to 'test-suite/bugs')
| -rw-r--r-- | test-suite/bugs/closed/gh6384.v | 5 | ||||
| -rw-r--r-- | test-suite/bugs/closed/gh6385.v | 5 |
2 files changed, 10 insertions, 0 deletions
diff --git a/test-suite/bugs/closed/gh6384.v b/test-suite/bugs/closed/gh6384.v new file mode 100644 index 0000000000..cec84642fb --- /dev/null +++ b/test-suite/bugs/closed/gh6384.v @@ -0,0 +1,5 @@ +Theorem test (A:Prop) : A \/ A -> A. + Fail intro H; destruct H as H. + (* Error: Disjunctive/conjunctive introduction pattern expected. *) + Fail intros H; destruct H as H. +Abort. diff --git a/test-suite/bugs/closed/gh6385.v b/test-suite/bugs/closed/gh6385.v new file mode 100644 index 0000000000..3bbb664f4f --- /dev/null +++ b/test-suite/bugs/closed/gh6385.v @@ -0,0 +1,5 @@ +Theorem test (A:Prop) : A \/ A -> A. + Fail let H := idtac in intros H; destruct H as H'. + (* Disjunctive/conjunctive introduction pattern expected. *) + Fail let H' := idtac in intros H; destruct H as H'. +Abort. |