[project @ 2000-09-05 12:38:26 by simonmar]
[ghc-hetmet.git] / ghc / tests / ccall / should_compile / cc009.hs
1 -- !!! cc009 -- foreign label returning newtype of Addr
2 module Test where
3
4 import Addr
5
6 newtype Ptr a = Ptr Addr
7
8 foreign label foo :: Ptr Int