Chapter 9.  Foreign function interface (FFI)

Table of Contents

9.1. GHC extensions to the FFI Addendum
9.1.1. Unboxed types
9.1.2. Newtype wrapping of the IO monad
9.2. Using the FFI with GHC
9.2.1. Using foreign export and foreign import ccall "wrapper" with GHC
9.2.1.1. Using your own main()
9.2.1.2. Making a Haskell library that can be called from foreign code
9.2.1.3. On the use of hs_exit()
9.2.2. Using function headers
9.2.3. Memory Allocation

GHC (mostly) conforms to the Haskell 98 Foreign Function Interface Addendum 1.0, whose definition is available from http://www.haskell.org/.

To enable FFI support in GHC, give the -XForeignFunctionInterface flag.

GHC implements a number of GHC-specific extensions to the FFI Addendum. These extensions are described in Section 9.1, “GHC extensions to the FFI Addendum”, but please note that programs using these features are not portable. Hence, these features should be avoided where possible.

The FFI libraries are documented in the accompanying library documentation; see for example the Foreign module.

9.1. GHC extensions to the FFI Addendum

The FFI features that are described in this section are specific to GHC. Your code will not be portable to other compilers if you use them.

9.1.1. Unboxed types

The following unboxed types may be used as basic foreign types (see FFI Addendum, Section 3.2): Int#, Word#, Char#, Float#, Double#, Addr#, StablePtr# a, MutableByteArray#, ForeignObj#, and ByteArray#.

9.1.2. Newtype wrapping of the IO monad

The FFI spec requires the IO monad to appear in various places, but it can sometimes be convenient to wrap the IO monad in a newtype, thus:

  newtype MyIO a = MIO (IO a)

(A reason for doing so might be to prevent the programmer from calling arbitrary IO procedures in some part of the program.)

The Haskell FFI already specifies that arguments and results of foreign imports and exports will be automatically unwrapped if they are newtypes (Section 3.2 of the FFI addendum). GHC extends the FFI by automatically unwrapping any newtypes that wrap the IO monad itself. More precisely, wherever the FFI specification requires an IO type, GHC will accept any newtype-wrapping of an IO type. For example, these declarations are OK:

   foreign import foo :: Int -> MyIO Int
   foreign import "dynamic" baz :: (Int -> MyIO Int) -> CInt -> MyIO Int