add TODO for HMG
This commit is contained in:
parent
d29c882cd6
commit
17c4f91812
@ -240,6 +240,7 @@ updateHomeModuleGraph' env smp0 = do
|
|||||||
mns = map (unLoc . ideclName)
|
mns = map (unLoc . ideclName)
|
||||||
$ filter (isNothing . ideclPkgQual)
|
$ filter (isNothing . ideclPkgQual)
|
||||||
$ map unLoc hsmodImports
|
$ map unLoc hsmodImports
|
||||||
|
-- TODO: handle package qualifier "this"
|
||||||
liftIO $ Set.fromList . catMaybes <$> mapM (findModulePath env) mns
|
liftIO $ Set.fromList . catMaybes <$> mapM (findModulePath env) mns
|
||||||
|
|
||||||
preprocessFile :: (IOish m, GmEnv m, GmState m) =>
|
preprocessFile :: (IOish m, GmEnv m, GmState m) =>
|
||||||
|
Loading…
Reference in New Issue
Block a user