[project @ 1999-07-12 10:43:10 by sof]

[ghc-hetmet.git] / ghc / lib / misc / SocketPrim.lhs

diff --git a/ghc/lib/misc/SocketPrim.lhs b/ghc/lib/misc/SocketPrim.lhs
index e761185..b63f663 100644 (file)
--- a/ghc/lib/misc/SocketPrim.lhs
+++ b/ghc/lib/misc/SocketPrim.lhs
@@ -1252,7 +1252,7 @@ use @withSocketsDo@...:
 
 \begin{code}
 withSocketsDo :: IO a -> IO a
-#if !defined(HAVE_WINSOCK_H) || defined(__CYGWIN32__)
+#if !defined(HAVE_WINSOCK_H) || defined(cygwin32_TARGET_OS)
 withSocketsDo x = x
 #else
 withSocketsDo act = do