Attempt to optimise ghc-stage2 in Quick flavour
authorAndrey Mokhov <andrey.mokhov@gmail.com>
Tue, 21 Jun 2016 00:56:20 +0000 (01:56 +0100)
committerAndrey Mokhov <andrey.mokhov@gmail.com>
Tue, 21 Jun 2016 00:56:20 +0000 (01:56 +0100)
See #259

src/Settings/Flavours/Quick.hs

index 81fe178..834a72b 100644 (file)
@@ -5,7 +5,7 @@ import GHC
 import Predicate
 
 optimise :: Context -> Bool
-optimise Context {..} = stage == Stage0 && package `elem` [compiler, ghc]
+optimise Context {..} = package `elem` [compiler, ghc]
                      || stage == Stage1 && isLibrary package
 
 quickFlavourArgs :: Args