Remove a now-redundant comment
[ghc-hetmet.git] / compiler / main / GHC.hs
index 2ecd2f0..19e36eb 100644 (file)
@@ -245,6 +245,7 @@ import HscMain
 import HscTypes
 import DynFlags
 import StaticFlags
+import StaticFlagParser
 import SysTools     ( initSysTools, cleanTempFiles, cleanTempFilesExcept,
                       cleanTempDirs )
 import Module
@@ -2263,7 +2264,7 @@ getTokenStream :: Session -> Module -> IO [Located Token]
 -- | Takes a 'ModuleName' and possibly a 'PackageId', and consults the
 -- filesystem and package database to find the corresponding 'Module', 
 -- using the algorithm that is used for an @import@ declaration.
-findModule :: Session -> ModuleName -> Maybe PackageId -> IO Module
+findModule :: Session -> ModuleName -> Maybe FastString -> IO Module
 findModule s mod_name maybe_pkg = withSession s $ \hsc_env ->
   let
         dflags = hsc_dflags hsc_env