From: simonmar <unknown>
Date: Tue, 17 May 2005 15:03:38 +0000 (+0000)
Subject: [project @ 2005-05-17 15:03:38 by simonmar]
X-Git-Tag: Initial_conversion_from_CVS_complete~524
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=869421155f9c1f32e1479a93c03519fc81214ef5;p=ghc-hetmet.git

[project @ 2005-05-17 15:03:38 by simonmar]
more import fixing
---

diff --git a/ghc/compiler/ghci/Linker.lhs b/ghc/compiler/ghci/Linker.lhs
index 89c3f49..81b512f 100644
--- a/ghc/compiler/ghci/Linker.lhs
+++ b/ghc/compiler/ghci/Linker.lhs
@@ -29,7 +29,6 @@ import ByteCodeAsm	( CompiledByteCode(..), bcoFreeNames, UnlinkedBCO(..))
 
 import Packages
 import DriverPhases	( isObjectFilename, isDynLibFilename )
-import Util		( getFileSuffix )
 import Finder		( findModule, findObjectLinkableMaybe, FindResult(..) )
 import HscTypes
 import Name		( Name, nameModule, isExternalName, isWiredInName )
@@ -41,7 +40,7 @@ import DynFlags		( DynFlags(..), getOpts )
 import BasicTypes	( SuccessFlag(..), succeeded, failed )
 import Outputable
 import Panic            ( GhcException(..) )
-import Util             ( zipLazy, global, joinFileExt, joinFileName )
+import Util             ( zipLazy, global, joinFileExt, joinFileName, suffixOf )
 import StaticFlags	( v_Ld_inputs )
 import ErrUtils         ( debugTraceMsg )