1{-# LANGUAGE ForeignFunctionInterface, InterruptibleFFI, CApiFFI
2  #-}
3module FFIExtensions where
4
5foreign import ccall interruptible "sleep" sleep ::
6               CUint -> IO CUint
7
8foreign import capi "header.h f" f :: CInt -> IO CInt
9