blob: 3dbce43e4d07d643eae5785e98b66d92b8068ea8 (
plain)
1
2
3
4
5
6
7
8
9
10
|
{-# LANGUAGE MagicHash #-}
module T10600 where
import GHC.Exts
-- This shouldn't compile as unlifted bindings aren't allowed at top-level.
-- However, #10600 described the situation where an error isn't throw when we
-- compile with -fno-code.
foo :: Int#
foo = 10600#
|
