Lower precedence for {-# UNPACK #-}
[ghc.git] / testsuite / tests / typecheck / should_fail / tcfail200.hs
1 {-# LANGUAGE MagicHash #-}
2
3 module ShouldFail where
4
5 f = let x = ( 1#, 'c' ) in x