packages feed

aihc-parser-1.0.0.2: test/Test/Fixtures/oracle/UnboxedTuples/multiline-explicit-layout.hs

{- ORACLE_TEST pass -}
{-# LANGUAGE UnboxedTuples #-}
module MultilineExplicitLayout where {

x :: Int -> (# Int, Int #);
x n =
  (#
    n
  , 2
  #);

f :: (# Int, Int #) -> Int;
f
  (# a
   , _
   #) = a;

g :: (# Int
      , Int #) -> (# Int
                  , Int #);
g t = t

}