testsuite/tests/deSugar/should_compile/ds002.hs


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

-- !!! ds002 -- overlapping equations and guards
--
-- this tests "overlapping" variables and guards

module ShouldCompile where

f x = x
f y = y
f z = z

g x y z | True = f z
    	| True = f z
    	| True = f z
g x y z | True = f z
    	| True = f z
    	| True = f z