>>397
import Foreign.Ptr
import Foreign.C.Types

foreign import ccall "mkData" mkData :: Ptr (Ptr CInt) -> IO CInt