ghc-exactprint-1.14.0.0: tests/examples/pre-ghc910/T13594.hs
{-# LANGUAGE BangPatterns #-}
{-# LANGUAGE GADTs #-}
{-# LANGUAGE RankNTypes #-}
module Bug where
x :: forall a b. (a ~ Integer, b ~ Integer) => (a, b)
!x = (1, 2)
~y = (1, 2)
{-# LANGUAGE BangPatterns #-}
{-# LANGUAGE GADTs #-}
{-# LANGUAGE RankNTypes #-}
module Bug where
x :: forall a b. (a ~ Integer, b ~ Integer) => (a, b)
!x = (1, 2)
~y = (1, 2)