diff options
| -rw-r--r-- | hadrian/src/Rules/Generate.hs | 4 | 
1 files changed, 2 insertions, 2 deletions
| diff --git a/hadrian/src/Rules/Generate.hs b/hadrian/src/Rules/Generate.hs index c8f8cf15ca..c755e389eb 100644 --- a/hadrian/src/Rules/Generate.hs +++ b/hadrian/src/Rules/Generate.hs @@ -314,9 +314,9 @@ generateSettings = do          , ("Use interpreter", expr $ yesNo <$> ghcWithInterpreter)          , ("Use native code generator", expr $ yesNo <$> ghcWithNativeCodeGen)          , ("Support SMP", expr $ yesNo <$> ghcWithSMP) -        , ("RTS ways", expr $ yesNo <$> flag LeadingUnderscore) +        , ("RTS ways", unwords . map show <$> getRtsWays)          , ("Tables next to code", expr $ yesNo <$> ghcEnableTablesNextToCode) -        , ("Leading underscore", expr $ yesNo <$> useLibFFIForAdjustors) +        , ("Leading underscore", expr $ yesNo <$> flag LeadingUnderscore)          , ("Use LibFFI", expr $ yesNo <$> useLibFFIForAdjustors)          , ("Use Threads", yesNo . any (wayUnit Threaded) <$> getRtsWays)          , ("Use Debugging", expr $ yesNo . ghcDebugged <$> flavour) | 
