summaryrefslogtreecommitdiff
path: root/testsuite/tests/typecheck/should_fail/T7545.hs
diff options
context:
space:
mode:
authorSimon Peyton Jones <simonpj@microsoft.com>2013-01-02 16:23:44 +0000
committerSimon Peyton Jones <simonpj@microsoft.com>2013-01-02 16:23:44 +0000
commitd056bb324ed633a34fc51bc417abd0e0cf1c12fc (patch)
tree3c82c4efb30dd91678eca722aff699fd59b72073 /testsuite/tests/typecheck/should_fail/T7545.hs
parent5e1d9d557524e00c0697f964f39e2eea875ef78a (diff)
downloadhaskell-d056bb324ed633a34fc51bc417abd0e0cf1c12fc.tar.gz
Test Trac #7545
Diffstat (limited to 'testsuite/tests/typecheck/should_fail/T7545.hs')
-rw-r--r--testsuite/tests/typecheck/should_fail/T7545.hs9
1 files changed, 9 insertions, 0 deletions
diff --git a/testsuite/tests/typecheck/should_fail/T7545.hs b/testsuite/tests/typecheck/should_fail/T7545.hs
new file mode 100644
index 0000000000..0acd4f82eb
--- /dev/null
+++ b/testsuite/tests/typecheck/should_fail/T7545.hs
@@ -0,0 +1,9 @@
+{-# LANGUAGE RankNTypes, InstanceSigs #-}
+module T7545 where
+
+class C a where
+ f :: a -> b
+
+instance C (a -> b) where
+ f :: x
+ f = undefined