Two more FFI bugs (maybe they have the same reason). If I
put
module Main
where
import Addr (Addr)
foreign export ccall dynamic mk :: (Addr -> IO ()) -> IO Addr
foo :: Addr -> IO ()
foo _ = print "bla\n"
main = do
fooHdl <- mk foo
return ()
into a file w
Manuel M. T. Chakravarty <[EMAIL PROTECTED]> writes:
>
> Two more FFI bugs (maybe they have the same reason). If I
> put
>
> module Main
> where
>
> import Addr (Addr)
>
> foreign export ccall dynamic mk :: (Addr -> IO ()) -> IO Addr
>
> foo :: Addr -> IO ()
> foo _ = print "bl
