aboutsummaryrefslogtreecommitdiff
path: root/test-suite/bugs/opened/3478.v-disabled
diff options
context:
space:
mode:
authorXavier Clerc2014-09-26 13:30:19 +0200
committerXavier Clerc2014-09-26 13:30:19 +0200
commit9b1b8aba9cd40cc91fd9d52af4e6c075311ba4db (patch)
tree200b94e827381cda5102b518291eb1962adb8311 /test-suite/bugs/opened/3478.v-disabled
parent158398435d1727e59f933f3eff6b58c5a635ffb8 (diff)
Add a bunch of reproduction files for bugs.
Diffstat (limited to 'test-suite/bugs/opened/3478.v-disabled')
-rw-r--r--test-suite/bugs/opened/3478.v-disabled8
1 files changed, 8 insertions, 0 deletions
diff --git a/test-suite/bugs/opened/3478.v-disabled b/test-suite/bugs/opened/3478.v-disabled
new file mode 100644
index 0000000000..cc926b2167
--- /dev/null
+++ b/test-suite/bugs/opened/3478.v-disabled
@@ -0,0 +1,8 @@
+Set Primitive Projections.
+Record foo := { foom :> Type }.
+Canonical Structure default_foo := fun T => {| foom := T |}.
+Record bar T := { bar1 : T }.
+Goal forall (s : foo) (x : foom s), True.
+Proof.
+ intros.
+ Timeout 1 pose (x : bar _) as x'. \ No newline at end of file