projects
/
ghc-hetmet.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
Export nameEnvUniqueElts, similar to nameEnvElts, but giving the Unique as well.
[ghc-hetmet.git]
/
compiler
/
ilxGen
/
tests
/
test20.hs
1
2
data N = Z | S N
3
4
res Z x y = (# x, y #)
5
res (S n) x y = res n x y
6
7
(# x, y #) = res (S Z) "no!" "hello world\n"
8
9
main = putStr y