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.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/testsuite/tests/ghc-api/apirecomp001/myghc.hs b/testsuite/tests/ghc-api/apirecomp001/myghc.hs
index 3d2cb9c238..7f1d7cdfff 100644
--- a/testsuite/tests/ghc-api/apirecomp001/myghc.hs
+++ b/testsuite/tests/ghc-api/apirecomp001/myghc.hs
@@ -26,7 +26,7 @@ main = do
logger <- getLogger
(dflags, _, _) <- parseDynamicFlags logger dflags0
(map (mkGeneralLocated "on the commandline") args)
- setSessionDynFlags $ dflags { backend = NoBackend
+ setSessionDynFlags $ dflags { backend = noBackend
, ghcLink = LinkInMemory
, verbosity = 0 -- silence please
}
@@ -37,7 +37,7 @@ main = do
prn "target nothing: ok"
dflags <- getSessionDynFlags
- setSessionDynFlags $ dflags { backend = Interpreter }
+ setSessionDynFlags $ dflags { backend = interpreterBackend }
ok <- load LoadAllTargets
when (failed ok) $ error "Couldn't load A.hs in interpreted mode"
prn "target interpreted: ok"