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
/
tc026.stderr
1
Typechecked:
2
AbsBinds [ot4] [] [(f.t1, ShouldSucceed.f)]
3
{- rec -}
4
f.t1 :: Bool -> ot4 -> ot4
5
f.t1 x.r56 y.r57
6
= if x.r56 then y.r57 else f.t1 x.r56 y.r57
7
AbsBinds [] [] [(g.t6, ShouldSucceed.g)]
8
{- nonrec -}
9
g.t6 :: Bool -> Bool
10
g.t6 x.r55 = (ShouldSucceed.f Bool)
11
((ShouldSucceed.f Bool) True x.r55) x.r55
12