[project @ 2001-06-01 14:33:01 by sewardj]
[ghc-hetmet.git] / ghc / tests / typecheck / should_fail / tcfail055.hs
1 module ShouldFail where
2
3 f x = (x + 1 :: Int) :: Float