diff options
| author |  Maxime Dénès <mail@maximedenes.fr> | 2017-12-14 17:49:08 +0100 |
|---|---|---|
| committer | Maxime Dénès <mail@maximedenes.fr> | 2017-12-14 17:49:08 +0100 |
| commit | b270ad686075e5579dc3826fafdc324ea339785c (patch) | |
| tree | ae92f5295953951fab6c56c1c249639551c75b0d /test-suite/bugs | |
| parent | 71662ab9b00ac657663e192d942a4ba7f241fd59 (diff) | |
| parent | 761dcf2355ac673b6fefe319fcbab907b1e8ec2d (diff) | |
Merge PR #6386: Catch errors while coercing 'and' intro patterns
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 000000000..cec84642f --- /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 000000000..3bbb664f4 --- /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. |