parent
d77e262915
commit
9b88b71f4d
@ -451,7 +451,9 @@ loadTargets opts targetStrs = do
|
|||||||
case target' of
|
case target' of
|
||||||
HscNothing -> do
|
HscNothing -> do
|
||||||
void $ load LoadAllTargets
|
void $ load LoadAllTargets
|
||||||
mapM_ (parseModule >=> typecheckModule >=> desugarModule) mg
|
forM_ mg $
|
||||||
|
handleSourceError (gmLog GmWarning "loadTargets" . text . show)
|
||||||
|
. void . (parseModule >=> typecheckModule >=> desugarModule)
|
||||||
HscInterpreted -> do
|
HscInterpreted -> do
|
||||||
void $ load LoadAllTargets
|
void $ load LoadAllTargets
|
||||||
_ -> error ("loadTargets: unsupported hscTarget")
|
_ -> error ("loadTargets: unsupported hscTarget")
|
||||||
|
Loading…
Reference in New Issue
Block a user