aihc-parser-1.0.0.2: test/Test/Fixtures/oracle/PatternSyntax/operator-pattern.hs
{- ORACLE_TEST pass -}
module OperatorPattern where
data Expr a = Plus a a
foldExpr (+) = fold
where
fold (Plus x y) = fold x + fold y
{- ORACLE_TEST pass -}
module OperatorPattern where
data Expr a = Plus a a
foldExpr (+) = fold
where
fold (Plus x y) = fold x + fold y