diff options
author | Simon Peyton Jones <simonpj@microsoft.com> | 2012-10-12 13:41:08 +0100 |
---|---|---|
committer | Simon Peyton Jones <simonpj@microsoft.com> | 2012-10-12 13:41:08 +0100 |
commit | 251d8430af2eb26815b1806e1e124dda1b40acf9 (patch) | |
tree | 69c76c50fa90ae63835783e4a2c638c0b73117ea /testsuite/tests/typecheck/should_compile/tc167.hs | |
parent | 671ec1c901d0b1f1a36ce4bb23a564c1a57aaf59 (diff) | |
download | haskell-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.hs | 2 |
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 |