X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=ghc%2FInteractiveUI.hs;h=5acb36e57d2329869eadec57f8d3343cbc29441f;hp=1c84846477cfb730db8c21a334a286fb929ef1b2;hb=d436c70d43fb905c63220040168295e473f4b90a;hpb=0bde11509ca13d4d0914496ee652d7c2b43a0420 diff --git a/ghc/InteractiveUI.hs b/ghc/InteractiveUI.hs index 1c84846..5acb36e 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