diff options
author | panne <unknown> | 2005-01-16 15:41:25 +0000 |
---|---|---|
committer | panne <unknown> | 2005-01-16 15:41:25 +0000 |
commit | f1c4b8922e32871a26b8074ef12392b9b8c8e662 (patch) | |
tree | 4b84918e0cab4d3f831c975a9ad204c88cb38f24 /src/HaddockUtil.hs | |
parent | 951d840870e67b452387b35c72d235511ed9163c (diff) |
[haddock @ 2005-01-16 15:41:21 by panne]
Cleaned up imports and dropped support for GHC < 5.03, it never worked, anyway.
Diffstat (limited to 'src/HaddockUtil.hs')
-rw-r--r-- | src/HaddockUtil.hs | 28 |
1 files changed, 11 insertions, 17 deletions
diff --git a/src/HaddockUtil.hs b/src/HaddockUtil.hs index 3b8f3a13..434d935e 100644 --- a/src/HaddockUtil.hs +++ b/src/HaddockUtil.hs @@ -25,30 +25,24 @@ module HaddockUtil ( html_xrefs_ref, ) where +import Binary import HaddockLex import HaddockParse import HaddockTypes - import HsSyn import Map ( Map ) -import qualified Map - -import List ( intersect, isSuffixOf, intersperse ) -import Maybe -import IO ( hPutStr, stderr ) -import System -import Binary -import Monad -import Char ( isAlpha, isSpace, toUpper, ord ) +import qualified Map hiding ( Map ) -#if __GLASGOW_HASKELL__ < 503 -import IOExts -import URI ( escapeString, unreserved ) -#else -import Data.IORef -import System.IO.Unsafe ( unsafePerformIO ) +import Control.Monad ( liftM, MonadPlus(..) ) +import Data.Char ( isAlpha, isSpace, toUpper, ord ) +import Data.IORef ( IORef, newIORef, readIORef ) +import Data.List ( intersect, isSuffixOf, intersperse ) +import Data.Maybe ( maybeToList, fromMaybe ) import Network.URI ( escapeString, unreserved ) -#endif +import System.Environment ( getProgName ) +import System.Exit ( exitWith, ExitCode(..) ) +import System.IO ( hPutStr, stderr ) +import System.IO.Unsafe ( unsafePerformIO ) -- ----------------------------------------------------------------------------- -- Some Utilities |