lookupModule does not exist in GHC 6.10, sigh.
This commit is contained in:
parent
a9ebab0469
commit
a84d6952cb
@ -20,7 +20,7 @@ browse :: String -> IO [String]
|
||||
browse mdlName = withGHCAPI (maybeNamesToStrings <$> lookupModuleInfo)
|
||||
|
||||
where
|
||||
lookupModuleInfo = lookupModule (mkModuleName mdlName) Nothing >>= getModuleInfo
|
||||
lookupModuleInfo = findModule (mkModuleName mdlName) Nothing >>= getModuleInfo
|
||||
maybeNamesToStrings = maybe [] (map getOccString . modInfoExports)
|
||||
|
||||
withGHCAPI :: Ghc a -> IO a
|
||||
|
Loading…
Reference in New Issue
Block a user