X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=Foreign%2FC%2FError.hs;h=33a7bfd263184041d8ecb1ca6eb75a7b8cd2e710;hb=d539a9457e2c79a9f13744d073d3f253ea2fb33e;hp=c6106e0792a75bdc2df300002f565d49bb9001d2;hpb=68f60ec9d6004e36d572bc3b2d38b25a16530706;p=ghc-base.git

diff --git a/Foreign/C/Error.hs b/Foreign/C/Error.hs
index c6106e0..33a7bfd 100644
--- a/Foreign/C/Error.hs
+++ b/Foreign/C/Error.hs
@@ -107,7 +107,6 @@ import Foreign.Marshal.Error 	( void )
 import Data.Maybe
 
 #if __GLASGOW_HASKELL__
-import GHC.Storable
 import GHC.IOBase
 import GHC.Num
 import GHC.Base
@@ -120,9 +119,6 @@ import System.IO.Unsafe		( unsafePerformIO )
 {-# CBITS errno.c #-}
 #endif
 
-#ifdef __NHC__
-import NHC.FFI			( CInt(..) )
-#endif
 
 -- "errno" type
 -- ------------