[project @ 2002-08-05 08:44:53 by simonmar]

Move the import of System.IO.Unsafe into the #else part of #ifdef
__GLASGOW_HASKELL__, because it was causing an import loop.
(Alastair: that #else should probably be #elif __HUGS__, right?)

diff --git a/Foreign/C/Error.hs b/Foreign/C/Error.hs
index a574086..84fd82c 100644 (file)
--- a/Foreign/C/Error.hs
+++ b/Foreign/C/Error.hs
@@ -97,7 +97,6 @@ import GHC.IOBase (Exception(..), IOException(..), IOErrorType(..))
 -- regular imports
 -- ---------------
 
-import System.IO.Unsafe( unsafePerformIO )
 import Foreign.Storable
 import Foreign.Ptr
 import Foreign.C.Types
@@ -112,6 +111,7 @@ import GHC.Num
 import GHC.Base
 #else
 import System.IO               ( IOError, Handle, ioError )
+import System.IO.Unsafe                ( unsafePerformIO )
 #endif
 
 -- "errno" type