[project @ 2005-01-29 16:10:27 by wolfgang]

[ghc-base.git] / GHC / Pack.lhs

diff --git a/GHC/Pack.lhs b/GHC/Pack.lhs
index d63b4e0..17d371e 100644 (file)
--- a/GHC/Pack.lhs
+++ b/GHC/Pack.lhs
@@ -1,5 +1,5 @@
 \begin{code}
-{-# OPTIONS -fno-implicit-prelude #-}
+{-# OPTIONS_GHC -fno-implicit-prelude #-}
 -----------------------------------------------------------------------------
 -- |
 -- Module      :  GHC.Pack
@@ -23,12 +23,12 @@ module GHC.Pack
        (
        -- (**) - emitted by compiler.
 
-       packCString#,      -- :: [Char] -> ByteArray#    **
+       packCString#,      -- :: [Char] -> ByteArray#    (**)
        unpackCString,
-       unpackCString#,    -- :: Addr# -> [Char]         **
-       unpackNBytes#,     -- :: Addr# -> Int# -> [Char] **
-       unpackFoldrCString#,  -- **
-       unpackAppendCString#,  -- **
+       unpackCString#,    -- :: Addr# -> [Char]         (**)
+       unpackNBytes#,     -- :: Addr# -> Int# -> [Char] (**)
+       unpackFoldrCString#,  -- (**)
+       unpackAppendCString#,  -- (**)
        ) 
        where