Change 11589 by gsar@moonru on 2001/08/05 21:35:50
4-arg select() was busted on windows because change#8178 didn't
make it into mainline
Affected files ...
... //depot/perl/perl.h#374 edit
... //depot/perl/win32/include/sys/socket.h#12 edit
Differences ...
==== //depot/perl/perl.h#374 (text) ====
Index: perl/perl.h
--- perl/perl.h.~1~ Sun Aug 5 15:45:05 2001
+++ perl/perl.h Sun Aug 5 15:45:05 2001
@@ -752,7 +752,7 @@
# define _SOCKADDR_LEN
#endif
-#if defined(HAS_SOCKET) && !defined(VMS) /* VMS handles sockets via vmsish.h */
+#if defined(HAS_SOCKET) && !defined(VMS) && !defined(WIN32) /* VMS/WIN32 handle
+sockets via vmsish.h/win32.h */
# include <sys/socket.h>
# if defined(USE_SOCKS) && defined(I_SOCKS)
# if !defined(INCLUDE_PROTOTYPES)
==== //depot/perl/win32/include/sys/socket.h#12 (text) ====
Index: perl/win32/include/sys/socket.h
--- perl/win32/include/sys/socket.h.~1~ Sun Aug 5 15:45:05 2001
+++ perl/win32/include/sys/socket.h Sun Aug 5 15:45:05 2001
@@ -17,6 +17,8 @@
#include <windows.h>
#include <winsock.h>
+#include "win32.h"
+
#define ENOTSOCK WSAENOTSOCK
#ifdef USE_SOCKETS_AS_HANDLES
End of Patch.
