projects
/
ghc-hetmet.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
645c395
)
[project @ 2002-01-22 13:04:13 by simonmar]
author
simonmar
<unknown>
Tue, 22 Jan 2002 13:04:13 +0000
(13:04 +0000)
committer
simonmar
<unknown>
Tue, 22 Jan 2002 13:04:13 +0000
(13:04 +0000)
Import wibbles
ghc/compiler/ghci/InteractiveUI.hs
patch
|
blob
|
history
diff --git
a/ghc/compiler/ghci/InteractiveUI.hs
b/ghc/compiler/ghci/InteractiveUI.hs
index
040f2cc
..
c1c16db
100644
(file)
--- a/
ghc/compiler/ghci/InteractiveUI.hs
+++ b/
ghc/compiler/ghci/InteractiveUI.hs
@@
-1,6
+1,6
@@
{-# OPTIONS -#include "Linker.h" -#include "SchedAPI.h" #-}
-----------------------------------------------------------------------------
{-# OPTIONS -#include "Linker.h" -#include "SchedAPI.h" #-}
-----------------------------------------------------------------------------
--- $Id: InteractiveUI.hs,v 1.106 2002/01/09 12:41:47 simonmar Exp $
+-- $Id: InteractiveUI.hs,v 1.107 2002/01/22 13:04:13 simonmar Exp $
--
-- GHC Interactive User Interface
--
--
-- GHC Interactive User Interface
--
@@
-15,11
+15,10
@@
module InteractiveUI ( interactiveUI, ghciWelcomeMsg ) where
import Packages
import CompManager
import HscTypes ( TyThing(..) )
import Packages
import CompManager
import HscTypes ( TyThing(..) )
-import MkIface
-import ByteCodeLink
+import MkIface ( ifaceTyThing )
import DriverFlags
import DriverState
import DriverFlags
import DriverState
-import DriverUtil
+import DriverUtil ( handle, remove_spaces )
import Linker
import Finder ( flushPackageCache )
import Util
import Linker
import Finder ( flushPackageCache )
import Util
@@
-34,7
+33,8
@@
import Name ( Name, isHomePackageName, nameSrcLoc, nameOccName,
import OccName ( isSymOcc )
import BasicTypes ( defaultFixity )
import Outputable
import OccName ( isSymOcc )
import BasicTypes ( defaultFixity )
import Outputable
-import CmdLineOpts ( DynFlag(..), getDynFlags, saveDynFlags, restoreDynFlags, dopt_unset )
+import CmdLineOpts ( DynFlag(..), getDynFlags, saveDynFlags, restoreDynFlags,
+ dopt_unset )
import Panic ( GhcException(..), showGhcException )
import Config
import Panic ( GhcException(..), showGhcException )
import Config