projects
/
ghc-hetmet.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
d7546365963585f994122335b57acb4697389c26
[ghc-hetmet.git]
/
ghc
/
compiler
/
tests
/
deSugar
/
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