aihc-parser-1.0.0.2: test/Test/Fixtures/oracle/PatternSyntax/multiple-operator-patterns.hs
{- ORACLE_TEST pass -}
module MultipleOperatorPatterns where
data Expr a = Const a | Plus a a | Minus a a | Times a a | Divide a a
foldExpr c (+) (-) (*) (/) = fold
where
fold x = undefined