ghc/tests/deSugar/should_compile/ds002.hs

   1 --!!! ds002 -- overlapping equations and guards
   2 --
   3 -- this tests "overlapping" variables and guards
   4
   5 module Test where
   6
   7 f x = x
   8 f y = y
   9 f z = z
  10
  11 g x y z | True = f z
  12         | True = f z
  13         | True = f z
  14 g x y z | True = f z
  15         | True = f z
  16         | True = f z