[commit: ghc] wip/nfs-locking: Switch to isWindows (88a7b4e)
git at git.haskell.org
git at git.haskell.org
Fri Oct 27 01:28:11 UTC 2017
Repository : ssh://git@git.haskell.org/ghc
On branch : wip/nfs-locking
Link : http://ghc.haskell.org/trac/ghc/changeset/88a7b4e31616f06ea9c0f75d3565ae11936009e0/ghc
>---------------------------------------------------------------
commit 88a7b4e31616f06ea9c0f75d3565ae11936009e0
Author: Andrey Mokhov <andrey.mokhov at gmail.com>
Date: Thu Sep 28 23:49:12 2017 +0100
Switch to isWindows
>---------------------------------------------------------------
88a7b4e31616f06ea9c0f75d3565ae11936009e0
src/Rules/Configure.hs | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/src/Rules/Configure.hs b/src/Rules/Configure.hs
index 5e29116..492d91c 100644
--- a/src/Rules/Configure.hs
+++ b/src/Rules/Configure.hs
@@ -1,6 +1,6 @@
module Rules.Configure (configureRules) where
-import qualified System.Info as System
+import qualified System.Info.Extra as System
import Base
import Builder
@@ -21,7 +21,7 @@ configureRules = do
++ "--skip-configure flag."
else do
-- We cannot use windowsHost here due to a cyclic dependency.
- when (System.os == "mingw32") $ do
+ when System.isWindows $ do
putBuild "| Checking for Windows tarballs..."
quietly $ cmd ["bash", "mk/get-win32-tarballs.sh", "download", System.arch]
let srcs = map (<.> "in") outs
More information about the ghc-commits
mailing list