projects / ghc-hetmet.git / blob
? search:
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 / tc004.hs
1 module ShouldSucceed where
2
3 f x = case x of
4        True -> True
5        False -> x
Glasgow Haskell Compiler with heterogeneous metaprogramming (generalized arrows and modal types)