summaryrefslogtreecommitdiff
path: root/testsuite/tests/typecheck/should_compile/tc167.hs
diff options
context:
space:
mode:
authorSimon Peyton Jones <simonpj@microsoft.com>2012-10-12 13:41:08 +0100
committerSimon Peyton Jones <simonpj@microsoft.com>2012-10-12 13:41:08 +0100
commit251d8430af2eb26815b1806e1e124dda1b40acf9 (patch)
tree69c76c50fa90ae63835783e4a2c638c0b73117ea /testsuite/tests/typecheck/should_compile/tc167.hs
parent671ec1c901d0b1f1a36ce4bb23a564c1a57aaf59 (diff)
downloadhaskell-251d8430af2eb26815b1806e1e124dda1b40acf9.tar.gz
GHC now treats ((->) t1 t2) just like (t1 -> t2), so we need to obfuscate this test a bit
Diffstat (limited to 'testsuite/tests/typecheck/should_compile/tc167.hs')
-rw-r--r--testsuite/tests/typecheck/should_compile/tc167.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/testsuite/tests/typecheck/should_compile/tc167.hs b/testsuite/tests/typecheck/should_compile/tc167.hs
index 7a9f410d64..b317763831 100644
--- a/testsuite/tests/typecheck/should_compile/tc167.hs
+++ b/testsuite/tests/typecheck/should_compile/tc167.hs
@@ -5,7 +5,7 @@
module ShouldSucceed where
import GHC.Base
-f :: (->) Int# Int#
+f :: ((->) Int#) Int#
f x = x