ghc/compiler/tests/deSugar/ds021.hs

   1 --!!! ds021 -- hairier uses of guards
   2
   3 module Test where
   4
   5 f x y z | x == y     = []
   6         | x /= z     = []
   7         | True       = []
   8         | False      = []