From: ross <unknown>
Date: Tue, 26 Jul 2005 09:37:28 +0000 (+0000)
Subject: [project @ 2005-07-26 09:37:27 by ross]
X-Git-Tag: cmm-merge2~41
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=2023ef93695488597b89387a3576dda9095ac222;p=ghc-base.git

[project @ 2005-07-26 09:37:27 by ross]
PrelHandle functions are only needed by GHC
---

diff --git a/base.buildinfo.in b/base.buildinfo.in
deleted file mode 100644
index 9fe31ef..0000000
--- a/base.buildinfo.in
+++ /dev/null
@@ -1 +0,0 @@
-extra-libraries: @EXTRA_LIBS@
diff --git a/configure.ac b/configure.ac
index 34ee36f..bf75f80 100644
--- a/configure.ac
+++ b/configure.ac
@@ -82,13 +82,6 @@ FP_CHECK_CONST([O_BINARY], [#include <fcntl.h>], [0])
 # Check for idiosyncracies in some mingw impls of directory handling.
 FP_READDIR_EOF_ERRNO
 
-case "$host" in
-*-mingw32) EXTRA_LIBS="wsock32" ;;
-*-solaris2) EXTRA_LIBS="nsl socket" ;;
-*)	EXTRA_LIBS= ;;
-esac
-AC_SUBST([EXTRA_LIBS])
-
-AC_CONFIG_FILES([config.mk base.buildinfo])
+AC_CONFIG_FILES([config.mk])
 
 AC_OUTPUT
diff --git a/include/HsBase.h b/include/HsBase.h
index 9281db0..ba3b40a 100644
--- a/include/HsBase.h
+++ b/include/HsBase.h
@@ -417,6 +417,8 @@ __hscore_setmode( HsInt fd, HsBool toBin )
 #endif
 }
 
+#if __GLASGOW_HASKELL__
+
 INLINE HsInt
 __hscore_PrelHandle_write( HsInt fd, HsAddr ptr, HsInt off, int sz )
 {
@@ -444,6 +446,8 @@ __hscore_PrelHandle_recv( HsInt fd, HsAddr ptr, HsInt off, int sz )
 }
 #endif
 
+#endif /* __GLASGOW_HASKELL__ */
+
 #if defined(mingw32_HOST_OS) || defined(_MSC_VER)
 INLINE long *
 __hscore_Time_ghcTimezone( void ) { return &_timezone; }