summaryrefslogtreecommitdiff
path: root/test-suite/bugs/closed/6534.v
diff options
context:
space:
mode:
Diffstat (limited to 'test-suite/bugs/closed/6534.v')
-rw-r--r--test-suite/bugs/closed/6534.v7
1 files changed, 7 insertions, 0 deletions
diff --git a/test-suite/bugs/closed/6534.v b/test-suite/bugs/closed/6534.v
new file mode 100644
index 00000000..f5013994
--- /dev/null
+++ b/test-suite/bugs/closed/6534.v
@@ -0,0 +1,7 @@
+Goal forall x : nat, x = x.
+Proof.
+intros x.
+refine ((fun x x => _ tt) tt tt).
+let t := match goal with [ |- ?P ] => P end in
+let _ := type of t in
+idtac.