haskell-src-exts-1.24.0: tests/examples/Unpack.hs

{-# LANGUAGE GADTs #-}

data CmmNode e x where
        CmmEntry :: {-# UNPACK #-} !Int -> CmmNode e x

data UI = UI {-# UNPACK #-} !Int