X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=GHC%2FStorable.lhs;h=982230c92156f2db12f627c91a26ca301b2892d1;hb=4dc0a6fa50f56444c76e84387a16b179df2549ee;hp=803df9cec851adb6de65257efe04108a384c4f33;hpb=4ef39162b8ae3ab239009e6386b5787475f172d9;p=ghc-base.git

diff --git a/GHC/Storable.lhs b/GHC/Storable.lhs
index 803df9c..982230c 100644
--- a/GHC/Storable.lhs
+++ b/GHC/Storable.lhs
@@ -1,5 +1,5 @@
 \begin{code}
-{-# OPTIONS_GHC -fno-implicit-prelude #-}
+{-# OPTIONS_GHC -XNoImplicitPrelude #-}
 {-# OPTIONS_HADDOCK hide #-}
 -----------------------------------------------------------------------------
 -- |
@@ -17,46 +17,44 @@
 
 -- #hide
 module GHC.Storable
-	( readWideCharOffPtr  
-	, readIntOffPtr       
-	, readWordOffPtr      
-	, readPtrOffPtr       
-	, readFunPtrOffPtr    
-	, readFloatOffPtr     
-	, readDoubleOffPtr    
-	, readStablePtrOffPtr 
-	, readInt8OffPtr      
-	, readInt16OffPtr     
-	, readInt32OffPtr     
-	, readInt64OffPtr     
-	, readWord8OffPtr     
-	, readWord16OffPtr    
-	, readWord32OffPtr    
-	, readWord64OffPtr    
-	, writeWideCharOffPtr 
-	, writeIntOffPtr      
-	, writeWordOffPtr     
-	, writePtrOffPtr      
-	, writeFunPtrOffPtr   
-	, writeFloatOffPtr    
-	, writeDoubleOffPtr   
-	, writeStablePtrOffPtr
-	, writeInt8OffPtr     
-	, writeInt16OffPtr    
-	, writeInt32OffPtr    
-	, writeInt64OffPtr    
-	, writeWord8OffPtr    
-	, writeWord16OffPtr   
-	, writeWord32OffPtr   
-	, writeWord64OffPtr   
+        ( readWideCharOffPtr  
+        , readIntOffPtr       
+        , readWordOffPtr      
+        , readPtrOffPtr       
+        , readFunPtrOffPtr    
+        , readFloatOffPtr     
+        , readDoubleOffPtr    
+        , readStablePtrOffPtr 
+        , readInt8OffPtr      
+        , readInt16OffPtr     
+        , readInt32OffPtr     
+        , readInt64OffPtr     
+        , readWord8OffPtr     
+        , readWord16OffPtr    
+        , readWord32OffPtr    
+        , readWord64OffPtr    
+        , writeWideCharOffPtr 
+        , writeIntOffPtr      
+        , writeWordOffPtr     
+        , writePtrOffPtr      
+        , writeFunPtrOffPtr   
+        , writeFloatOffPtr    
+        , writeDoubleOffPtr   
+        , writeStablePtrOffPtr
+        , writeInt8OffPtr     
+        , writeInt16OffPtr    
+        , writeInt32OffPtr    
+        , writeInt64OffPtr    
+        , writeWord8OffPtr    
+        , writeWord16OffPtr   
+        , writeWord32OffPtr   
+        , writeWord64OffPtr   
         ) where
 
-import GHC.Stable	( StablePtr(..) )
+import GHC.Stable       ( StablePtr(..) )
 import GHC.Int
 import GHC.Word
 import GHC.Ptr
-import GHC.Float
-import GHC.IOBase
 import GHC.Base
 \end{code}