1 2 3 4 5 6 7 8 9
{-# LANGUAGE MagicHash #-} module T15460 where import GHC.Int main :: IO () main = do let x = I# (0xfffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff#) print x