diff options
author | simonpj@microsoft.com <unknown> | 2009-07-06 11:22:01 +0000 |
---|---|---|
committer | simonpj@microsoft.com <unknown> | 2009-07-06 11:22:01 +0000 |
commit | d436c70d43fb905c63220040168295e473f4b90a (patch) | |
tree | ce7dd3b7faca1c31e82a3ec4a44fa9a32186c556 /ghc | |
parent | 0bde11509ca13d4d0914496ee652d7c2b43a0420 (diff) | |
download | haskell-d436c70d43fb905c63220040168295e473f4b90a.tar.gz |
Trim unused imports detected by new unused-import code
Diffstat (limited to 'ghc')
-rw-r--r-- | ghc/GhciMonad.hs | 6 | ||||
-rw-r--r-- | ghc/InteractiveUI.hs | 7 | ||||
-rw-r--r-- | ghc/Main.hs | 8 |
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 |