Commit 728751c6 authored by simonpj's avatar simonpj

[project @ 2005-07-12 13:36:07 by simonpj]

Add unboxed-tuple binding test (was simpl008)
parent e6a693f0
......@@ -125,3 +125,4 @@ test('tcfail137', normal, compile_fail, [''])
test('tcfail138', normal, compile_fail, [''])
test('tcfail139', normal, compile_fail, [''])
test('tcfail140', normal, compile_fail, [''])
test('tcfail141', only_compiler_types(['ghc']), compile_fail, [''])
{-# OPTIONS -fglasgow-exts #-}
-- Should fail, because f :: (# Int#, ByteArray# #)
module ShouldFail where
import GHC.Prim
main :: IO ()
main = let f = int2Integer# 0# in putStrLn ""
tcfail141.hs:10:11:
Illegal binding of unboxed tuple f :: (# Int#, ByteArray# #)
In the definition of `main': main = let f = int2Integer# 0# in putStrLn ""
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment