, sharedCAF
) where
-import Foreign
+import Foreign hiding (unsafePerformIO)
import Foreign.C
#ifdef mingw32_HOST_OS
#if !defined(mingw32_HOST_OS)
-import Foreign
+import Foreign hiding (unsafePerformIO)
import Foreign.C
import Data.Maybe
import GHC.Base
import GHC.Num
import GHC.Show
import GHC.Real
+import System.IO.Unsafe (unsafePerformIO)
import System.Posix.Internals
c_DEBUG_DUMP :: Bool
import Data.Typeable
import Control.Monad
import Data.Maybe
-import Foreign
+import Foreign hiding (unsafePerformIO)
-- import System.IO.Error
import System.Posix.Internals hiding (FD)
#endif
#ifdef __GLASGOW_HASKELL__
-import Foreign
+import Foreign hiding (unsafePerformIO)
import Foreign.C
+import System.IO.Unsafe (unsafePerformIO)
#include "HsBaseConfig.h"