diff options
| -rw-r--r-- | hadrian/src/Settings/Builders/RunTest.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/hadrian/src/Settings/Builders/RunTest.hs b/hadrian/src/Settings/Builders/RunTest.hs index 7ea8d4f364..806c31473b 100644 --- a/hadrian/src/Settings/Builders/RunTest.hs +++ b/hadrian/src/Settings/Builders/RunTest.hs @@ -63,6 +63,7 @@ runTestBuilderArgs = builder RunTest ? do let hasRtsWay w = elem w rtsWays hasLibWay w = elem w libWays hasDynamic <- getBooleanSetting TestGhcDynamic + leadingUnderscore <- getFlag LeadingUnderscore withNativeCodeGen <- getBooleanSetting TestGhcWithNativeCodeGen withInterpreter <- getBooleanSetting TestGhcWithInterpreter unregisterised <- getBooleanSetting TestGhcUnregisterised @@ -127,6 +128,7 @@ runTestBuilderArgs = builder RunTest ? do , arg "-e", arg $ asBool "ghc_with_smp=" withSMP , arg "-e", arg $ "config.ghc_dynamic=" ++ show hasDynamic + , arg "-e", arg $ "config.leading_underscore=" ++ show leadingUnderscore , arg "-e", arg $ "config.wordsize=" ++ show wordsize , arg "-e", arg $ "config.os=" ++ show os |