aihc-parser-1.0.0.2: test/Test/Fixtures/oracle/haskell2010/expressions/pattern-labeled.hs
{- ORACLE_TEST pass -}
module ExprS317PatLabeled where
data R = R { a :: Int, b :: Int }
x r = case r of { R { a = n } -> n }{- ORACLE_TEST pass -}
module ExprS317PatLabeled where
data R = R { a :: Int, b :: Int }
x r = case r of { R { a = n } -> n }