summaryrefslogtreecommitdiff
path: root/ghc
diff options
context:
space:
mode:
authorsimonpj@microsoft.com <unknown>2009-07-06 11:22:01 +0000
committersimonpj@microsoft.com <unknown>2009-07-06 11:22:01 +0000
commitd436c70d43fb905c63220040168295e473f4b90a (patch)
treece7dd3b7faca1c31e82a3ec4a44fa9a32186c556 /ghc
parent0bde11509ca13d4d0914496ee652d7c2b43a0420 (diff)
downloadhaskell-d436c70d43fb905c63220040168295e473f4b90a.tar.gz
Trim unused imports detected by new unused-import code
Diffstat (limited to 'ghc')
-rw-r--r--ghc/GhciMonad.hs6
-rw-r--r--ghc/InteractiveUI.hs7
-rw-r--r--ghc/Main.hs8
3 files changed, 10 insertions, 11 deletions
diff --git a/ghc/GhciMonad.hs b/ghc/GhciMonad.hs
index fb76d4765a..e0653871b8 100644
--- a/ghc/GhciMonad.hs
+++ b/ghc/GhciMonad.hs
@@ -30,13 +30,13 @@ import qualified MonadUtils
import qualified ErrUtils
import Exception
-import Data.Maybe
+-- import Data.Maybe
import Numeric
import Data.Array
-import Data.Char
+-- import Data.Char
import Data.Int ( Int64 )
import Data.IORef
-import Data.List
+-- import Data.List
import System.CPUTime
import System.Environment
import System.IO
diff --git a/ghc/InteractiveUI.hs b/ghc/InteractiveUI.hs
index 1c84846477..5acb36e57d 100644
--- a/ghc/InteractiveUI.hs
+++ b/ghc/InteractiveUI.hs
@@ -23,14 +23,14 @@ import Debugger
-- The GHC interface
import qualified GHC hiding (resume, runStmt)
import GHC ( LoadHowMuch(..), Target(..), TargetId(..),
- Module, ModuleName, TyThing(..), Phase,
- BreakIndex, SrcSpan, Resume, SingleStep,
+ TyThing(..), Phase,
+ BreakIndex, Resume, SingleStep,
Ghc, handleSourceError )
import PprTyThing
import DynFlags
import Packages
-import PackageConfig
+-- import PackageConfig
import UniqFM
import HscTypes ( implicitTyThings, handleFlagWarnings )
@@ -68,7 +68,6 @@ import Control.Monad.Trans
--import SystemExts
import Exception hiding (catch, block, unblock)
-import qualified Exception
-- import Control.Concurrent
diff --git a/ghc/Main.hs b/ghc/Main.hs
index c078cdb389..8bd9c8b5ea 100644
--- a/ghc/Main.hs
+++ b/ghc/Main.hs
@@ -12,9 +12,9 @@ module Main (main) where
-- The official GHC API
import qualified GHC
-import GHC ( DynFlags(..), HscTarget(..),
- GhcMode(..), GhcLink(..),
- LoadHowMuch(..), dopt, DynFlag(..),
+import GHC ( -- DynFlags(..), HscTarget(..),
+ -- GhcMode(..), GhcLink(..),
+ LoadHowMuch(..), -- dopt, DynFlag(..),
defaultCallbacks )
import CmdLineParser
@@ -43,7 +43,7 @@ import Outputable
import SrcLoc
import Util
import Panic
-import MonadUtils ( liftIO )
+-- import MonadUtils ( liftIO )
-- Standard Haskell libraries
import System.IO