[project @ 2002-10-03 13:29:07 by panne]

[ghc-base.git] / Foreign.hs

diff --git a/Foreign.hs b/Foreign.hs
index 0b22468..15e26db 100644 (file)
--- a/Foreign.hs
+++ b/Foreign.hs
@@ -3,7 +3,7 @@
 -- |
 -- Module      :  Foreign
 -- Copyright   :  (c) The FFI task force 2001
--- License     :  BSD-style (see the file libraries/core/LICENSE)
+-- License     :  BSD-style (see the file libraries/base/LICENSE)
 -- 
 -- Maintainer  :  ffi@haskell.org
 -- Stability   :  provisional
@@ -25,6 +25,10 @@ module Foreign
        , module Foreign.Marshal.Array
        , module Foreign.Marshal.Error
        , module Foreign.Marshal.Utils
+
+       -- For compatibility with the FFI addendum only.  The recommended
+       -- place to get this from is System.IO.Unsafe.
+       , unsafePerformIO
         ) where
 
 import Data.Int
@@ -37,3 +41,5 @@ import Foreign.Marshal.Alloc
 import Foreign.Marshal.Array
 import Foreign.Marshal.Error
 import Foreign.Marshal.Utils
+
+import System.IO.Unsafe (unsafePerformIO)