blob: 4b75cee139893bd8506811b8ae8312cc4734e6cb (
plain) (
tree)
|
|
module MyModule where
foreign import ccall get_thing :: IO Int
getThing :: IO Int
getThing = get_thing
foreign import ccall set_thing :: Int -> IO ()
setThing :: Int -> IO ()
setThing = set_thing
|