diff options
Diffstat (limited to 'hadrian/src')
| -rwxr-xr-x | hadrian/src/Settings.hs | 3 | ||||
| -rw-r--r-- | hadrian/src/Settings/Flavours/Quick.hs | 11 |
2 files changed, 12 insertions, 2 deletions
diff --git a/hadrian/src/Settings.hs b/hadrian/src/Settings.hs index 373e976b44..30f65bb4f1 100755 --- a/hadrian/src/Settings.hs +++ b/hadrian/src/Settings.hs @@ -54,7 +54,8 @@ hadrianFlavours :: [Flavour] hadrianFlavours = [ benchmarkFlavour, defaultFlavour, developmentFlavour Stage1 , developmentFlavour Stage2, performanceFlavour, profiledFlavour - , quickFlavour, quickestFlavour, quickCrossFlavour, benchmarkLlvmFlavour + , quickFlavour, quickValidateFlavour, quickestFlavour + , quickCrossFlavour, benchmarkLlvmFlavour , performanceLlvmFlavour, profiledLlvmFlavour, quickLlvmFlavour , ghcInGhciFlavour, validateFlavour, slowValidateFlavour ] diff --git a/hadrian/src/Settings/Flavours/Quick.hs b/hadrian/src/Settings/Flavours/Quick.hs index deea0c47dd..4146d66586 100644 --- a/hadrian/src/Settings/Flavours/Quick.hs +++ b/hadrian/src/Settings/Flavours/Quick.hs @@ -1,4 +1,8 @@ -module Settings.Flavours.Quick (quickFlavour) where +module Settings.Flavours.Quick + ( quickFlavour + , quickValidateFlavour + ) +where import Expression import Flavour @@ -30,3 +34,8 @@ quickArgs = sourceArgs SourceArgs , hsLibrary = notStage0 ? arg "-O" , hsCompiler = stage0 ? arg "-O2" , hsGhc = stage0 ? arg "-O" } + +quickValidateFlavour :: Flavour +quickValidateFlavour = werror $ quickFlavour + { name = "quick-validate" + } |