Brian Hulley wrote:
I've got the beginnings of an API for a GUI system as follows:
...
addTop :: ForeignPtr (Window a) -> IO ()
addTop w = withForeignPtr w duma_addTop
This works, but it seems a bit of a pain to have to manually convert
between ForeignPtr's and Ptr's all the time.
In particular, for the definition of addTop, I tried:
foreign import ccall "duma_addTop" addTop :: ForeignPtr (Window a) -> IO ()
This is the way it used to be in GHC before the FFI. In the FFI we
moved to withForeignPtr instead. IIRC, the motivation was something
along these lines:
- allowing ForeignPtr to be passed directly to a foreign function
implies some magic that happens at the point of the foreign call
to convert the ForeignPtr to a Ptr.
- there also has to be some magic to ensure that the ForeignPtr
couldn't be finalized until the call returns. This amounted to
adding a touch# primitive to keep the ForeignPtr alive over the call.
So internally the compiler was doing something like withForeignPtr
anyway. This behaviour is quite hard to explain in the spec,
withForeignPtr is much simpler.
- We wanted withForeignPtr anyway, to avoid having to duplicate all the
marshalling operations that operate on Ptr.
So, given that we wanted withForeignPtr anyway, there was no need to
also have the compiler do its internal magic to allow ForeignPtr to be
used as an FFI argument. Also, this means GHC doesn't need a primitive
ForeignPtr type (the primitive Ptr type is enough).
Later on, we discovered that the withForeignPtr interface enables a much
more efficient representation of ForeignPtr. This is coming in GHC 6.6.
Cheers,
Simon
_______________________________________________
Glasgow-haskell-users mailing list
Glasgow-haskell-users@haskell.org
http://www.haskell.org/mailman/listinfo/glasgow-haskell-users
