{-# LANGUAGE ForeignFunctionInterface, InterruptibleFFI, CApiFFI
  #-}
module FFIExtensions where

foreign import ccall interruptible "sleep" sleep ::
               CUint -> IO CUint

foreign import capi "header.h f" f :: CInt -> IO CInt