HaRe-0.8.0.0: test/testdata/Case/B.hs.expected

module B where
-- Test for refactor of if to case

foo x = case (odd x) of
  True  -> "Odd"
  False -> "Even"

bob x y = x + y


foo' x = case (odd x) of
  True -> "Odd"
  False -> "Even"

main = do
  putStrLn $ show $ foo 5

mary = [1,2,3]

h = bob 1 2