Remove obsolete pre-Haddock-2 `#hide` pragmas

The now obsolete (and redundant) `#hide` pragmas have been superseded by
`{-# OPTIONS_HADDOCK hide #-}` pragmas which are used by most of the
affected modules anyway.

This commit also adds proper `{-# OPTIONS_HADDOCK hide #-}` pragmas to
`GHC.Desugar` and `GHC.IO.Encoding.Iconv` which had only the ineffective
`#hide` annotation.

Signed-off-by: Herbert Valerio Riedel <hvr@gnu.org>

37 files changed, 4 insertions, 39 deletions

diff --git a/libraries/base/Control/Monad/ST/Imp.hs b/libraries/base/Control/Monad/ST/Imp.hs
index 1c030e8d6e..984970fc72 100644
--- a/libraries/base/Control/Monad/ST/Imp.hs
+++ b/libraries/base/Control/Monad/ST/Imp.hs
@@ -17,7 +17,6 @@
 --
 -----------------------------------------------------------------------------
 
--- #hide
 module Control.Monad.ST.Imp (
         -- * The 'ST' Monad
         ST,             -- abstract, instance of Functor, Monad, Typeable.
diff --git a/libraries/base/Control/Monad/ST/Lazy/Imp.hs b/libraries/base/Control/Monad/ST/Lazy/Imp.hs
index 40f5267290..19e8974807 100644
--- a/libraries/base/Control/Monad/ST/Lazy/Imp.hs
+++ b/libraries/base/Control/Monad/ST/Lazy/Imp.hs
@@ -18,7 +18,6 @@
 --
 -----------------------------------------------------------------------------
 
--- #hide
 module Control.Monad.ST.Lazy.Imp (
         -- * The 'ST' monad
         ST,
diff --git a/libraries/base/GHC/Arr.lhs b/libraries/base/GHC/Arr.lhs
index 702c76d869..f310e2e150 100644
--- a/libraries/base/GHC/Arr.lhs
+++ b/libraries/base/GHC/Arr.lhs
@@ -18,7 +18,6 @@
 --
 -----------------------------------------------------------------------------
 
--- #hide
 module GHC.Arr (
         Ix(..), Array(..), STArray(..),
 
diff --git a/libraries/base/GHC/Base.lhs b/libraries/base/GHC/Base.lhs
index 0958eb7f3f..d876202654 100644
--- a/libraries/base/GHC/Base.lhs
+++ b/libraries/base/GHC/Base.lhs
@@ -93,7 +93,6 @@ Other Prelude modules are much easier with fewer complex dependencies.
 
 #include "MachDeps.h"
 
--- #hide
 module GHC.Base
         (
         module GHC.Base,
diff --git a/libraries/base/GHC/Conc.lhs b/libraries/base/GHC/Conc.lhs
index 02781237df..1ba17f2912 100644
--- a/libraries/base/GHC/Conc.lhs
+++ b/libraries/base/GHC/Conc.lhs
@@ -21,9 +21,8 @@
 -- No: #hide, because bits of this module are exposed by the stm package.
 -- However, we don't want this module to be the home location for the
 -- bits it exports, we'd rather have Control.Concurrent and the other
--- higher level modules be the home.  Hence:
+-- higher level modules be the home.  Hence: #not-home
 
--- #not-home
 module GHC.Conc
         ( ThreadId(..)
 
diff --git a/libraries/base/GHC/Conc/IO.hs b/libraries/base/GHC/Conc/IO.hs
index 6ee23e5b1e..473fd0cea4 100644
--- a/libraries/base/GHC/Conc/IO.hs
+++ b/libraries/base/GHC/Conc/IO.hs
@@ -25,9 +25,8 @@
 -- No: #hide, because bits of this module are exposed by the stm package.
 -- However, we don't want this module to be the home location for the
 -- bits it exports, we'd rather have Control.Concurrent and the other
--- higher level modules be the home.  Hence:
+-- higher level modules be the home.  Hence: #not-home
 
--- #not-home
 module GHC.Conc.IO
         ( ensureIOManagerIsRunning
         , ioManagerCapabilitiesChanged
diff --git a/libraries/base/GHC/Desugar.hs b/libraries/base/GHC/Desugar.hs
index 72553bf089..cdea698851 100644
--- a/libraries/base/GHC/Desugar.hs
+++ b/libraries/base/GHC/Desugar.hs
@@ -3,6 +3,7 @@
            , RankNTypes
            , ExistentialQuantification
   #-}
+{-# OPTIONS_HADDOCK hide #-}
 
 -----------------------------------------------------------------------------
 -- |
@@ -18,7 +19,6 @@
 -- 
 -----------------------------------------------------------------------------
 
--- #hide
 module GHC.Desugar ((>>>), AnnotationWrapper(..), toAnnotationWrapper) where
 
 import Control.Arrow    (Arrow(..))
diff --git a/libraries/base/GHC/Enum.lhs b/libraries/base/GHC/Enum.lhs
index 36f05ff9f1..9a94009871 100644
--- a/libraries/base/GHC/Enum.lhs
+++ b/libraries/base/GHC/Enum.lhs
@@ -19,7 +19,6 @@
 
 #include "MachDeps.h"
 
--- #hide
 module GHC.Enum(
         Bounded(..), Enum(..),
         boundedEnumFrom, boundedEnumFromThen,
diff --git a/libraries/base/GHC/Err.lhs b/libraries/base/GHC/Err.lhs
index 2ec7ab5594..f7679842e0 100644
--- a/libraries/base/GHC/Err.lhs
+++ b/libraries/base/GHC/Err.lhs
@@ -22,7 +22,6 @@
 -- 
 -----------------------------------------------------------------------------
 
--- #hide
 module GHC.Err( absentErr, error, undefined ) where
 import GHC.CString ()
 import GHC.Types
diff --git a/libraries/base/GHC/Exception.lhs b/libraries/base/GHC/Exception.lhs
index b878b6c05b..540df31da1 100644
--- a/libraries/base/GHC/Exception.lhs
+++ b/libraries/base/GHC/Exception.lhs
@@ -21,7 +21,6 @@
 -- 
 -----------------------------------------------------------------------------
 
--- #hide
 module GHC.Exception
        ( Exception(..)    -- Class
        , throw
diff --git a/libraries/base/GHC/Float.lhs b/libraries/base/GHC/Float.lhs
index 7a4f39af6c..95192535f0 100644
--- a/libraries/base/GHC/Float.lhs
+++ b/libraries/base/GHC/Float.lhs
@@ -28,7 +28,6 @@
 
 #include "ieee-flpt.h"
 
--- #hide
 module GHC.Float( module GHC.Float, Float(..), Double(..), Float#, Double#
                 , double2Int, int2Double, float2Int, int2Float )
     where
diff --git a/libraries/base/GHC/Float/ConversionUtils.hs b/libraries/base/GHC/Float/ConversionUtils.hs
index c7fcf8dcb4..4d0674f128 100644
--- a/libraries/base/GHC/Float/ConversionUtils.hs
+++ b/libraries/base/GHC/Float/ConversionUtils.hs
@@ -19,7 +19,6 @@
 
 #include "MachDeps.h"
 
--- #hide
 module GHC.Float.ConversionUtils ( elimZerosInteger, elimZerosInt# ) where
 
 import GHC.Base
diff --git a/libraries/base/GHC/Float/RealFracMethods.hs b/libraries/base/GHC/Float/RealFracMethods.hs
index c072208fca..9c71cf1a2e 100644
--- a/libraries/base/GHC/Float/RealFracMethods.hs
+++ b/libraries/base/GHC/Float/RealFracMethods.hs
@@ -22,7 +22,6 @@
 
 #include "MachDeps.h"
 
--- #hide
 module GHC.Float.RealFracMethods
     ( -- * Double methods
       -- ** Integer results
diff --git a/libraries/base/GHC/ForeignPtr.hs b/libraries/base/GHC/ForeignPtr.hs
index daa8be9f0e..58b4f9a3fa 100644
--- a/libraries/base/GHC/ForeignPtr.hs
+++ b/libraries/base/GHC/ForeignPtr.hs
@@ -21,7 +21,6 @@
 -- 
 -----------------------------------------------------------------------------
 
--- #hide
 module GHC.ForeignPtr
   (
         ForeignPtr(..),
diff --git a/libraries/base/GHC/GHCi.hs b/libraries/base/GHC/GHCi.hs
index 213a7c565c..f66d540574 100644
--- a/libraries/base/GHC/GHCi.hs
+++ b/libraries/base/GHC/GHCi.hs
@@ -17,7 +17,6 @@
 --
 -----------------------------------------------------------------------------
 
--- #hide
 module GHC.GHCi {-# WARNING "This is an unstable interface." #-} (
         GHCiSandboxIO(..), NoIO()
     ) where
diff --git a/libraries/base/GHC/IO.hs b/libraries/base/GHC/IO.hs
index cd71698c68..2718c83285 100644
--- a/libraries/base/GHC/IO.hs
+++ b/libraries/base/GHC/IO.hs
@@ -22,7 +22,6 @@
 --
 -----------------------------------------------------------------------------
 
--- #hide
 module GHC.IO (
         IO(..), unIO, failIO, liftIO,
         unsafePerformIO, unsafeInterleaveIO,
diff --git a/libraries/base/GHC/IO/Encoding/Iconv.hs b/libraries/base/GHC/IO/Encoding/Iconv.hs
index 54f2a2de02..d46ade9d37 100644
--- a/libraries/base/GHC/IO/Encoding/Iconv.hs
+++ b/libraries/base/GHC/IO/Encoding/Iconv.hs
@@ -4,6 +4,7 @@
            , ForeignFunctionInterface
            , NondecreasingIndentation
   #-}
+{-# OPTIONS_HADDOCK hide #-}
 
 -----------------------------------------------------------------------------
 -- |
@@ -19,7 +20,6 @@
 --
 -----------------------------------------------------------------------------
 
--- #hide
 module GHC.IO.Encoding.Iconv (
 #if !defined(mingw32_HOST_OS)
    iconvEncoding, mkIconvEncoding,
diff --git a/libraries/base/GHC/IO/Handle/Internals.hs b/libraries/base/GHC/IO/Handle/Internals.hs
index 9248638553..db90864d88 100644
--- a/libraries/base/GHC/IO/Handle/Internals.hs
+++ b/libraries/base/GHC/IO/Handle/Internals.hs
@@ -26,7 +26,6 @@
 --
 -----------------------------------------------------------------------------
 
--- #hide
 module GHC.IO.Handle.Internals (
   withHandle, withHandle', withHandle_,
   withHandle__', withHandle_', withAllHandles__,
diff --git a/libraries/base/GHC/IO/Handle/Text.hs b/libraries/base/GHC/IO/Handle/Text.hs
index 6ff3ac1b6b..dbc96a11a0 100644
--- a/libraries/base/GHC/IO/Handle/Text.hs
+++ b/libraries/base/GHC/IO/Handle/Text.hs
@@ -26,7 +26,6 @@
 --
 -----------------------------------------------------------------------------
 
--- #hide
 module GHC.IO.Handle.Text ( 
         hWaitForInput, hGetChar, hGetLine, hGetContents, hPutChar, hPutStr,
         commitBuffer',       -- hack, see below
diff --git a/libraries/base/GHC/Int.hs b/libraries/base/GHC/Int.hs
index 5d8264aebc..b9a807edf3 100644
--- a/libraries/base/GHC/Int.hs
+++ b/libraries/base/GHC/Int.hs
@@ -19,7 +19,6 @@
 
 #include "MachDeps.h"
 
--- #hide
 module GHC.Int (
         Int8(..), Int16(..), Int32(..), Int64(..),
         uncheckedIShiftL64#, uncheckedIShiftRA64#
diff --git a/libraries/base/GHC/List.lhs b/libraries/base/GHC/List.lhs
index 9315ecfe70..5358f15561 100644
--- a/libraries/base/GHC/List.lhs
+++ b/libraries/base/GHC/List.lhs
@@ -17,7 +17,6 @@
 --
 -----------------------------------------------------------------------------
 
--- #hide
 module GHC.List (
    -- [] (..),          -- built-in syntax; can't be used in export list
 
diff --git a/libraries/base/GHC/Num.lhs b/libraries/base/GHC/Num.lhs
index 7cfc377762..5cdf782a41 100644
--- a/libraries/base/GHC/Num.lhs
+++ b/libraries/base/GHC/Num.lhs
@@ -16,7 +16,6 @@
 --
 -----------------------------------------------------------------------------
 
--- #hide
 module GHC.Num (module GHC.Num, module GHC.Integer) where
 
 import GHC.Base
diff --git a/libraries/base/GHC/PArr.hs b/libraries/base/GHC/PArr.hs
index 7a229d62d9..d569acab28 100644
--- a/libraries/base/GHC/PArr.hs
+++ b/libraries/base/GHC/PArr.hs
@@ -20,7 +20,6 @@
 --                This will be cleaned up when we change the internal represention of '[::]' to not
 --                rely on a wired-in type constructor.
 
--- #hide
 module GHC.PArr where
 
 import GHC.Base
diff --git a/libraries/base/GHC/Pack.lhs b/libraries/base/GHC/Pack.lhs
index 91fa6ddffc..ba6107e548 100644
--- a/libraries/base/GHC/Pack.lhs
+++ b/libraries/base/GHC/Pack.lhs
@@ -22,7 +22,6 @@
 --
 -----------------------------------------------------------------------------
 
--- #hide
 module GHC.Pack
        (
         -- (**) - emitted by compiler.
diff --git a/libraries/base/GHC/Ptr.lhs b/libraries/base/GHC/Ptr.lhs
index 4c9bb01b58..c959d1e375 100644
--- a/libraries/base/GHC/Ptr.lhs
+++ b/libraries/base/GHC/Ptr.lhs
@@ -17,7 +17,6 @@
 --
 -----------------------------------------------------------------------------
 
--- #hide
 module GHC.Ptr (
         Ptr(..), FunPtr(..),
         nullPtr, castPtr, plusPtr, alignPtr, minusPtr,
diff --git a/libraries/base/GHC/Read.lhs b/libraries/base/GHC/Read.lhs
index a8494be360..582ffea7e6 100644
--- a/libraries/base/GHC/Read.lhs
+++ b/libraries/base/GHC/Read.lhs
@@ -18,7 +18,6 @@
 --
 -----------------------------------------------------------------------------
 
--- #hide
 module GHC.Read
   ( Read(..)   -- class
 
diff --git a/libraries/base/GHC/Real.lhs b/libraries/base/GHC/Real.lhs
index 0d2713f174..d70dd819d9 100644
--- a/libraries/base/GHC/Real.lhs
+++ b/libraries/base/GHC/Real.lhs
@@ -18,7 +18,6 @@
 --
 -----------------------------------------------------------------------------
 
--- #hide
 module GHC.Real where
 
 import GHC.Base
diff --git a/libraries/base/GHC/ST.lhs b/libraries/base/GHC/ST.lhs
index 6f2fba180c..5da8b0afed 100644
--- a/libraries/base/GHC/ST.lhs
+++ b/libraries/base/GHC/ST.lhs
@@ -16,7 +16,6 @@
 --
 -----------------------------------------------------------------------------
 
--- #hide
 module GHC.ST (
         ST(..), STret(..), STRep,
         fixST, runST, runSTRep,
diff --git a/libraries/base/GHC/STRef.lhs b/libraries/base/GHC/STRef.lhs
index 05a91a6885..1fbc5a3d79 100644
--- a/libraries/base/GHC/STRef.lhs
+++ b/libraries/base/GHC/STRef.lhs
@@ -17,7 +17,6 @@
 --
 -----------------------------------------------------------------------------
 
--- #hide
 module GHC.STRef (
         STRef(..),
         newSTRef, readSTRef, writeSTRef
diff --git a/libraries/base/GHC/Show.lhs b/libraries/base/GHC/Show.lhs
index cf308cbc55..45338e8845 100644
--- a/libraries/base/GHC/Show.lhs
+++ b/libraries/base/GHC/Show.lhs
@@ -32,7 +32,6 @@
 --
 -----------------------------------------------------------------------------
 
--- #hide
 module GHC.Show
         (
         Show(..), ShowS,
diff --git a/libraries/base/GHC/Stable.lhs b/libraries/base/GHC/Stable.lhs
index ba7205415e..a1dde83117 100644
--- a/libraries/base/GHC/Stable.lhs
+++ b/libraries/base/GHC/Stable.lhs
@@ -21,7 +21,6 @@
 --
 -----------------------------------------------------------------------------
 
--- #hide
 module GHC.Stable (
         StablePtr(..),
         newStablePtr,
diff --git a/libraries/base/GHC/Storable.lhs b/libraries/base/GHC/Storable.lhs
index 119fed6293..13668725af 100644
--- a/libraries/base/GHC/Storable.lhs
+++ b/libraries/base/GHC/Storable.lhs
@@ -17,7 +17,6 @@
 --
 -----------------------------------------------------------------------------
 
--- #hide
 module GHC.Storable
         ( readWideCharOffPtr  
         , readIntOffPtr       
diff --git a/libraries/base/GHC/TopHandler.lhs b/libraries/base/GHC/TopHandler.lhs
index 160b8d128c..09ab583a2d 100644
--- a/libraries/base/GHC/TopHandler.lhs
+++ b/libraries/base/GHC/TopHandler.lhs
@@ -25,7 +25,6 @@
 --
 -----------------------------------------------------------------------------
 
--- #hide
 module GHC.TopHandler (
         runMainIO, runIO, runIOFastExit, runNonIO,
         topHandler, topHandlerFastExit,
diff --git a/libraries/base/GHC/Unicode.hs b/libraries/base/GHC/Unicode.hs
index 6b124ad1e6..07ddc59e05 100644
--- a/libraries/base/GHC/Unicode.hs
+++ b/libraries/base/GHC/Unicode.hs
@@ -18,7 +18,6 @@
 --
 -----------------------------------------------------------------------------
 
--- #hide
 module GHC.Unicode (
         isAscii, isLatin1, isControl,
         isAsciiUpper, isAsciiLower,
diff --git a/libraries/base/GHC/Weak.lhs b/libraries/base/GHC/Weak.lhs
index b3ae376f33..bffd9f8236 100644
--- a/libraries/base/GHC/Weak.lhs
+++ b/libraries/base/GHC/Weak.lhs
@@ -23,7 +23,6 @@
 --
 -----------------------------------------------------------------------------
 
--- #hide
 module GHC.Weak (
         Weak(..),
         mkWeak,
diff --git a/libraries/base/GHC/Word.hs b/libraries/base/GHC/Word.hs
index d2568eadbd..86978dc9c4 100644
--- a/libraries/base/GHC/Word.hs
+++ b/libraries/base/GHC/Word.hs
@@ -19,7 +19,6 @@
 
 #include "MachDeps.h"
 
--- #hide
 module GHC.Word (
     Word(..), Word8(..), Word16(..), Word32(..), Word64(..),
     uncheckedShiftL64#,
diff --git a/libraries/base/System/Posix/Internals.hs b/libraries/base/System/Posix/Internals.hs
index 833366e042..1869f7548d 100644
--- a/libraries/base/System/Posix/Internals.hs
+++ b/libraries/base/System/Posix/Internals.hs
@@ -21,7 +21,6 @@
 --
 -----------------------------------------------------------------------------
 
--- #hide
 module System.Posix.Internals where
 
 #include "HsBaseConfig.h"