Remove a TODO that is now done
authorDuncan Coutts <duncan@well-typed.com>
Sun, 24 Aug 2014 02:41:45 +0000 (03:41 +0100)
committerEdward Z. Yang <ezyang@cs.stanford.edu>
Fri, 29 Aug 2014 11:39:04 +0000 (12:39 +0100)
compiler/main/Packages.lhs

index 9640f72..9b18a33 100644 (file)
@@ -383,10 +383,6 @@ readPackageConfig dflags conf_file = do
        then do let filename = conf_file </> "package.cache"
                debugTraceMsg dflags 2 (text "Using binary package database:" <+> text filename)
                readPackageDbForGhc filename
-{-
-               -- TODO readPackageDbForGhc ^^ instead
-               return (map installedPackageInfoToPackageConfig conf)
--}
        else do
             isfile <- doesFileExist conf_file
             if isfile