Index: tclWinSock.c
===================================================================
RCS file: /cvsroot/tcl/tcl/win/tclWinSock.c,v
retrieving revision 1.26
diff -c -r1.26 tclWinSock.c
*** tclWinSock.c	24 May 2002 18:57:09 -0000	1.26
--- tclWinSock.c	28 May 2002 00:15:17 -0000
***************
*** 14,19 ****
--- 14,28 ----
  #include "tclWinInt.h"
  
  /*
+  * Make sure to remove the redirection defines set in tclWinPort.h
+  * that is in use in other sections of the core, except for us.
+  */
+ #undef getservbyname
+ #undef getsockopt
+ #undef ntohs
+ #undef setsockopt
+ 
+ /*
   * The following variable is used to tell whether this module has been
   * initialized.
   */
