[project @ 2001-08-22 11:45:06 by sewardj]
[ghc-hetmet.git] / ghc / tests / ccall / should_compile / cc003.hs
1 -- !!! cc003 -- ccall with unresolved polymorphism (should fail)
2 -- !!! not anymore (as of 0.29, result type will default to ())
3 module ShouldCompile where
4
5 fubar :: IO Int
6 fubar = _ccall_ f >>_ccall_ b
7                      -- ^ result type of f "lost" (never gets generalised)