aboutsummaryrefslogtreecommitdiffhomepage
path: root/test-suite
diff options
context:
space:
mode:
authorGravatar Xavier Clerc <xavier.clerc@inria.fr>2014-09-26 11:57:03 +0200
committerGravatar Xavier Clerc <xavier.clerc@inria.fr>2014-09-26 11:57:03 +0200
commit8b2a7924b2849d527e8afbcec3e8017e3f3a1429 (patch)
tree2d73e988d0fafe3480c92d45428739f42f2fe73e /test-suite
parent0fb36157b9ba2a177d2d1ddcf060f4e2f720d6cb (diff)
Test cases for closed bugs.
Diffstat (limited to 'test-suite')
-rw-r--r--test-suite/bugs/closed/3010b.v5
-rw-r--r--test-suite/bugs/closed/3016.v4
2 files changed, 9 insertions, 0 deletions
diff --git a/test-suite/bugs/closed/3010b.v b/test-suite/bugs/closed/3010b.v
new file mode 100644
index 000000000..65fea4248
--- /dev/null
+++ b/test-suite/bugs/closed/3010b.v
@@ -0,0 +1,5 @@
+Definition wtf (n : nat) : nat :=
+ (match n with
+ 0 => (fun H : n = 0 => 0)
+ | S n' => (fun H : n = S n' => 0)
+ end) (eq_refl n).
diff --git a/test-suite/bugs/closed/3016.v b/test-suite/bugs/closed/3016.v
new file mode 100644
index 000000000..bd4f1dd80
--- /dev/null
+++ b/test-suite/bugs/closed/3016.v
@@ -0,0 +1,4 @@
+Section foo.
+ Variable C : Type.
+ Goal True.
+ change (eq (A := ?C) ?x ?y) with (eq).