summaryrefslogtreecommitdiff
path: root/testsuite/tests/ghc-api/apirecomp001/myghc.hs
diff options
context:
space:
mode:
Diffstat (limited to 'testsuite/tests/ghc-api/apirecomp001/myghc.hs')
-rw-r--r--testsuite/tests/ghc-api/apirecomp001/myghc.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/testsuite/tests/ghc-api/apirecomp001/myghc.hs b/testsuite/tests/ghc-api/apirecomp001/myghc.hs
index 03c57e93a5..76dd6511ba 100644
--- a/testsuite/tests/ghc-api/apirecomp001/myghc.hs
+++ b/testsuite/tests/ghc-api/apirecomp001/myghc.hs
@@ -23,7 +23,8 @@ main = do
libdir : args <- getArgs
runGhc (Just libdir) $ do
dflags0 <- getSessionDynFlags
- (dflags, _, _) <- parseDynamicFlags dflags0
+ logger <- getLogger
+ (dflags, _, _) <- parseDynamicFlags logger dflags0
(map (mkGeneralLocated "on the commandline") args)
setSessionDynFlags $ dflags { backend = NoBackend
, ghcLink = LinkInMemory