X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=GHC%2FStorable.lhs;h=3a53f4bc402deeb93f4b78a7e7945f070464dcaa;hb=7659d3c9c7c6dc87d3d2be1391f123c15553a1a4;hp=6bd420e4a411ecac4d3547aab63fcac2cd342b40;hpb=2cbb22c51e493dfe294bc042af94e25380b9e1ba;p=ghc-base.git

diff --git a/GHC/Storable.lhs b/GHC/Storable.lhs
index 6bd420e..3a53f4b 100644
--- a/GHC/Storable.lhs
+++ b/GHC/Storable.lhs
@@ -1,5 +1,5 @@
 \begin{code}
-{-# OPTIONS -fno-implicit-prelude #-}
+{-# OPTIONS_GHC -fno-implicit-prelude #-}
 -----------------------------------------------------------------------------
 -- |
 -- Module      :  GHC.Storable
@@ -10,10 +10,11 @@
 -- Stability   :  internal
 -- Portability :  non-portable (GHC Extensions)
 --
--- The 'Storable' class.
+-- Helper functions for "Foreign.Storable"
 --
 -----------------------------------------------------------------------------
 
+-- #hide
 module GHC.Storable
 	( readWideCharOffPtr  
 	, readIntOffPtr       
@@ -59,8 +60,6 @@ import GHC.IOBase
 import GHC.Base
 \end{code}
 
-Helper functions for Foreign.Storable
-
 \begin{code}
 
 readWideCharOffPtr  :: Ptr Char          -> Int -> IO Char