X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=GHC%2FStorable.lhs;h=982230c92156f2db12f627c91a26ca301b2892d1;hb=c14fb1c6eb6fd79c99cb5f3d82d2463f76d8c955;hp=5fe189410a51cf3a406637e73eec17458420f79b;hpb=138c798d8a5cd0da989f8632a9cfd83e22d78545;p=ghc-base.git

diff --git a/GHC/Storable.lhs b/GHC/Storable.lhs
index 5fe1894..982230c 100644
--- a/GHC/Storable.lhs
+++ b/GHC/Storable.lhs
@@ -1,5 +1,6 @@
 \begin{code}
-{-# OPTIONS -fno-implicit-prelude #-}
+{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# OPTIONS_HADDOCK hide #-}
 -----------------------------------------------------------------------------
 -- |
 -- Module      :  GHC.Storable
@@ -14,48 +15,46 @@
 --
 -----------------------------------------------------------------------------
 
+-- #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.Stable
 import GHC.Ptr
-import GHC.Float
-import GHC.IOBase
 import GHC.Base
 \end{code}