[project @ 2000-09-06 13:30:48 by simonmar]
[ghc-hetmet.git] / ghc / tests / ccall / should_compile / cc008.hs
1 -- !!! cc008 -- foreign export dynamic returning newtype of Addr
2 module Test where
3
4 import Addr
5
6 newtype Ptr a = Ptr Addr
7
8 foreign export dynamic mkFoo :: IO () -> IO (Ptr Int)