aihc-parser-1.0.0.2: test/Test/Fixtures/oracle/haskell2010/patterns/labeled.hs
{- ORACLE_TEST pass -}
module P8 where
data Pair = Pair { left :: Int, right :: Int }
leftValue Pair { left = x, right = _ } = x
isPair Pair {} = True{- ORACLE_TEST pass -}
module P8 where
data Pair = Pair { left :: Int, right :: Int }
leftValue Pair { left = x, right = _ } = x
isPair Pair {} = True