From efb5ba8c57208313d03a5a84ec387244082d23c6 Mon Sep 17 00:00:00 2001
From: Pierre-Marie Pédrot
Date: Fri, 30 May 2014 12:03:21 +0200
Subject: Adding test-suite for bug #3355.

---
 test-suite/bugs/closed/3355.v | 6 ++++++
 1 file changed, 6 insertions(+)
 create mode 100644 test-suite/bugs/closed/3355.v

(limited to 'test-suite')

diff --git a/test-suite/bugs/closed/3355.v b/test-suite/bugs/closed/3355.v
new file mode 100644
index 0000000000..46a5714781
--- /dev/null
+++ b/test-suite/bugs/closed/3355.v
@@ -0,0 +1,6 @@
+Inductive paths {A} (x : A) : A -> Type := idpath : paths x x.
+Goal forall A B : Set, @paths Type A B -> @paths Set A B.
+Proof.
+  intros A B H.
+  Fail exact H.
+Abort.
-- 
cgit v1.2.3