X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2FcompMan%2FCmLink.lhs;h=811601b1f609c49ef44623426316dcb8773adfa9;hb=292c077de7dbe98eb44911648f16e243b40db2ac;hp=9940ecae46e87cf6fc75890e6fa9e1a3c8eae7f4;hpb=8894fd8508fc5ac3b793187c323e4732a73b4a24;p=ghc-hetmet.git

diff --git a/ghc/compiler/compMan/CmLink.lhs b/ghc/compiler/compMan/CmLink.lhs
index 9940eca..811601b 100644
--- a/ghc/compiler/compMan/CmLink.lhs
+++ b/ghc/compiler/compMan/CmLink.lhs
@@ -18,6 +18,7 @@ import Interpreter
 import CmStaticInfo	( PackageConfigInfo, GhciMode(..) )
 import Module		( ModuleName, PackageName )
 import Outputable	( SDoc )
+import FiniteMap
 import Digraph		( SCC(..), flattenSCC )
 import Outputable
 import Panic		( panic )
@@ -145,7 +146,6 @@ link doLink Interactive batch_attempt_linking linkables pls1
    = do putStrLn "LINKER(interactive): not yet implemented"
         return (LinkOK pls1)
 
-
 ppLinkableSCC :: SCC Linkable -> SDoc
 ppLinkableSCC = ppr . flattenSCC