diff options
Diffstat (limited to 'ghc')
| -rw-r--r-- | ghc/Main.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ghc/Main.hs b/ghc/Main.hs index 41a2f9340a..b7992b10b8 100644 --- a/ghc/Main.hs +++ b/ghc/Main.hs @@ -199,7 +199,7 @@ main' postLoadMode dflags0 args flagWarnings = do let dflags4 = case bcknd of Interpreter | not (gopt Opt_ExternalInterpreter dflags3) -> let platform = targetPlatform dflags3 - dflags3a = dflags3 { ways = hostFullWays } + dflags3a = dflags3 { targetWays_ = hostFullWays } dflags3b = foldl gopt_set dflags3a $ concatMap (wayGeneralFlags platform) hostFullWays |