projects
/
ghc-hetmet.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
000052365e63eeacc504eb05f15236657051a1ea
[ghc-hetmet.git]
/
ghc
/
tests
/
deSugar
/
should_compile
/
ds029.hs
1
-- !!! ds029: pattern binding with guards (dubious but valid)
2
--
3
4
module ShouldCompile where
5
6
f x = y
7
where (y,z) | y < z = (0,1)
8
| y > z = (1,2)
9
| True = (2,3)