From 2322c55b1ef55f524dae8f2feca68dc2d8d4fce0 Mon Sep 17 00:00:00 2001
From: Michael Snoyman <michael@snoyman.com>
Date: Thu, 28 May 2015 17:42:51 +0300
Subject: [PATCH] Allow parallel builds on Windows #84

---
 src/Stack/Build.hs | 7 +------
 1 file changed, 1 insertion(+), 6 deletions(-)

diff --git a/src/Stack/Build.hs b/src/Stack/Build.hs
index fbd29cd3a5..c66d563c4d 100644
--- a/src/Stack/Build.hs
+++ b/src/Stack/Build.hs
@@ -53,7 +53,6 @@ import           Data.Text (Text)
 import qualified Data.Text as T
 import qualified Data.Text.Encoding as T
 import           Distribution.Package (Dependency (..))
-import           Distribution.System (OS (Windows), Platform (..))
 import           Network.HTTP.Conduit (Manager)
 import           Network.HTTP.Download
 import           Path as FL
@@ -482,11 +481,7 @@ runPlans _bopts _packages plans _docLoc = do
     shakeDir <- asks configShakeFilesDir
     shakeArgs
         shakeDir
-        (case configPlatform config of
-             Platform _ Windows ->
-                 1 -- See: https://github.com/fpco/stack/issues/84
-             _ ->
-                 defaultShakeThreads)
+        defaultShakeThreads
         (do sequence_ plans
             {- EKB FIXME: doc generation for stack-doc-server
             when