Foreign/Concurrent.hs

   1 {-# OPTIONS -fno-implicit-prelude #-}
   2 -----------------------------------------------------------------------------
   3 -- |
   4 -- Module      :  Foreign.Concurrent
   5 -- Copyright   :  (c) The University of Glasgow 2003
   6 -- License     :  BSD-style (see the file libraries/base/LICENSE)
   7 --
   8 -- Maintainer  :  ffi@haskell.org
   9 -- Stability   :  provisional
  10 -- Portability :  non-portable (requires concurrency)
  11 --
  12 -- FFI datatypes and operations that use or require concurrency.
  13 --
  14 -----------------------------------------------------------------------------
  15
  16 module Foreign.Concurrent
  17   (
  18         -- * Concurrency-based @ForeignPtr@ operations
  19 #ifdef __GLASGOW_HASKELL__
  20         newForeignPtr,
  21         addForeignPtrFinalizer,
  22 #endif
  23   ) where
  24
  25 #ifdef __GLASGOW_HASKELL__
  26 import qualified GHC.ForeignPtr
  27 #endif
  28
  29 #ifdef __GLASGOW_HASKELL__
  30 newForeignPtr          = GHC.ForeignPtr.newConcForeignPtr
  31 addForeignPtrFinalizer = GHC.ForeignPtr.addForeignPtrConcFinalizer
  32 #endif