projects
/
ghc-hetmet.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
[project @ 1996-01-08 20:28:12 by partain]
[ghc-hetmet.git]
/
ghc
/
compiler
/
tests
/
typecheck
/
should_succeed
/
tc040.stderr
1
Typechecked:
2
AbsBinds [a.t2] [d.Eq.t3] [(f.t1, ShouldSucceed.f)]
3
(d.Eq.t12, d.Eq.t3)
4
(==.t9, (==) a.t2 d.Eq.t12)
5
{- nonrec -}
6
f.t1 :: a.t2 -> [a.t2]
7
f.t1 x.r55 = g.r56 x.r55
8
where
9
AbsBinds [] [] [(g.t6, g.r56)]
10
{- nonrec -}
11
g.t6 :: a.t2 -> [a.t2]
12
g.t6 y.r57 = if y.r57 ==.t9 x.r55 then
13
[] (a.t2)
14
else
15
[y.r57] (a.t2)
16
{- nonrec -}
17