Minor revision
authorAndrey Mokhov <andrey.mokhov@gmail.com>
Sat, 7 Jan 2017 22:40:55 +0000 (22:40 +0000)
committerAndrey Mokhov <andrey.mokhov@gmail.com>
Sat, 7 Jan 2017 22:40:55 +0000 (22:40 +0000)
src/Settings/Default.hs
src/Settings/Flavours/Quick.hs
src/Settings/Flavours/Quickest.hs

index 061d4ae..92089ab 100644 (file)
@@ -118,7 +118,6 @@ stage2Packages = do
              , ghcTags       ] ++
              [ haddock | doc ]
 
--- TODO: What about profilingDynamic way? Do we need platformSupportsSharedLibs?
 -- | Default build ways for library packages:
 -- * We always build 'vanilla' way.
 -- * We build 'profiling' way when stage > Stage0.
index 6935544..324ec85 100644 (file)
@@ -10,8 +10,7 @@ quickFlavour :: Flavour
 quickFlavour = defaultFlavour
     { name        = "quick"
     , args        = defaultBuilderArgs <> quickArgs <> defaultPackageArgs
-    , libraryWays = append [vanilla]
-    , rtsWays     = append [vanilla, threaded] }
+    , libraryWays = append [vanilla] }
 
 optimise :: Context -> Bool
 optimise Context {..} =
index 62ad43e..4d64cd0 100644 (file)
@@ -6,10 +6,10 @@ import {-# SOURCE #-} Settings.Default
 
 quickestFlavour :: Flavour
 quickestFlavour = defaultFlavour
-    { name         = "quickest"
-    , args         = defaultBuilderArgs <> quickestArgs <> defaultPackageArgs
-    , libraryWays  = append [vanilla]
-    , rtsWays      = quickestRtsWays }
+    { name        = "quickest"
+    , args        = defaultBuilderArgs <> quickestArgs <> defaultPackageArgs
+    , libraryWays = append [vanilla]
+    , rtsWays     = quickestRtsWays }
 
 quickestArgs :: Args
 quickestArgs = builder Ghc ? arg "-O0"