1 -- !!! cc004 -- foreign declarations
2 module ShouldCompile where
11 foreign import stdcall "m" m_stdcall :: StablePtr a -> IO (StablePtr b)
12 foreign import ccall "m" unsafe m_ccall :: ByteArray Int -> IO Int
14 foreign import stdcall "sin" my_sin :: Double -> IO Double
15 foreign import stdcall "cos" my_cos :: Double -> IO Double
17 foreign import stdcall "m1" m8 :: IO Int8
18 foreign import stdcall "m2" m16 :: IO Int16
19 foreign import stdcall "m3" m32 :: IO Int32
20 foreign import stdcall "m4" m64 :: IO Int64
22 foreign import stdcall dynamic d8 :: Addr -> IO Int8
23 foreign import stdcall dynamic d16 :: Addr -> IO Int16
24 foreign import stdcall dynamic d32 :: Addr -> IO Int32
25 foreign import stdcall dynamic d64 :: Addr -> IO Int64
27 foreign import ccall "kitchen" unsafe
30 -> MutableByteArray Int RealWorld
45 foreign import ccall dynamic unsafe
49 -> MutableByteArray Int RealWorld