diff options
| author | Matthew Pickering <matthewtpickering@gmail.com> | 2021-06-21 20:46:57 +0800 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2021-06-23 03:00:57 -0400 |
| commit | 6bf823168f22a3779b7f8d10b41216c411890c63 (patch) | |
| tree | c8bb11ac63d7a469054486681d06bcf56997c78c /hadrian | |
| parent | d8e5b274dd258f85867e874a35fa719922a758f0 (diff) | |
| download | haskell-6bf823168f22a3779b7f8d10b41216c411890c63.tar.gz | |
hadrian: Pass correct leading_underscore configuration to tests
Diffstat (limited to 'hadrian')
| -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 |