summaryrefslogtreecommitdiff
path: root/compiler/utils
diff options
context:
space:
mode:
authorIan Lynagh <ian@well-typed.com>2012-08-28 22:46:31 +0100
committerIan Lynagh <ian@well-typed.com>2012-08-28 22:46:31 +0100
commita94b80b1b1fa8a24f52a33bb38d1975e52a4037a (patch)
treea5dbc548f1bc479c799be00d62139640c12a2dcf /compiler/utils
parent6a43ff84b303b5b874ff5850604458bcb2bab712 (diff)
downloadhaskell-a94b80b1b1fa8a24f52a33bb38d1975e52a4037a.tar.gz
Remove Util.{isDarwinTarget,isWindowsTarget}
Diffstat (limited to 'compiler/utils')
-rw-r--r--compiler/utils/Util.lhs17
1 files changed, 5 insertions, 12 deletions
diff --git a/compiler/utils/Util.lhs b/compiler/utils/Util.lhs
index 9d12946052..87171545f8 100644
--- a/compiler/utils/Util.lhs
+++ b/compiler/utils/Util.lhs
@@ -10,7 +10,7 @@ module Util (
-- * Flags dependent on the compiler build
ghciSupported, debugIsOn, ncgDebugIsOn,
ghciTablesNextToCode, isDynamicGhcLib,
- isWindowsHost, isWindowsTarget, isDarwinTarget,
+ isWindowsHost, isDarwinHost,
-- * General list processing
zipEqual, zipWithEqual, zipWith3Equal, zipWith4Equal,
@@ -192,18 +192,11 @@ isWindowsHost = True
isWindowsHost = False
#endif
-isWindowsTarget :: Bool
-#ifdef mingw32_TARGET_OS
-isWindowsTarget = True
+isDarwinHost :: Bool
+#ifdef darwin_HOST_OS
+isDarwinHost = True
#else
-isWindowsTarget = False
-#endif
-
-isDarwinTarget :: Bool
-#ifdef darwin_TARGET_OS
-isDarwinTarget = True
-#else
-isDarwinTarget = False
+isDarwinHost = False
#endif
\end{code}