diff options
Diffstat (limited to 'hadrian/src/Settings/Builders/RunTest.hs')
| -rw-r--r-- | hadrian/src/Settings/Builders/RunTest.hs | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/hadrian/src/Settings/Builders/RunTest.hs b/hadrian/src/Settings/Builders/RunTest.hs index 5551cf1b35..13eb146134 100644 --- a/hadrian/src/Settings/Builders/RunTest.hs +++ b/hadrian/src/Settings/Builders/RunTest.hs @@ -100,9 +100,7 @@ inTreeCompilerArgs stg = do withInterpreter <- ghcWithInterpreter unregisterised <- flag GhcUnregisterised withSMP <- targetSupportsSMP - debugAssertions <- if stg >= Stage2 - then ghcDebugAssertions <$> flavour - else return False + debugAssertions <- ($ stg) . ghcDebugAssertions <$> flavour profiled <- ghcProfiled <$> flavour <*> pure stg os <- setting HostOs |