summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2012-08-23 20:18:52 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2012-08-23 20:18:52 (GMT)
commit53c615a311188f20c2867619c49f87289a255bfd (patch)
tree196b0dfa46b93993128a3287ef14906e2fb8b845
parent5b6d377583611280dd6b24739e4891334c3fb515 (diff)
parentb02e97a2b368aa22f4d35a51ab1d3efdf197352b (diff)
downloadtcl-53c615a311188f20c2867619c49f87289a255bfd.zip
tcl-53c615a311188f20c2867619c49f87289a255bfd.tar.gz
tcl-53c615a311188f20c2867619c49f87289a255bfd.tar.bz2
small wrapper for TclWinNToHs, for change in calling convention
-rw-r--r--generic/tclStubInit.c8
1 files changed, 7 insertions, 1 deletions
diff --git a/generic/tclStubInit.c b/generic/tclStubInit.c
index 7eb1788..4f562a7 100644
--- a/generic/tclStubInit.c
+++ b/generic/tclStubInit.c
@@ -53,7 +53,13 @@ static int TclSockMinimumBuffersOld(int sock, int size)
}
#endif
-#define TclWinNToHS ntohs
+
+#if defined(_WIN32) || defined(__CYGWIN__)
+#define TclWinNToHS winNToHS
+static unsigned short TclWinNToHS(unsigned short ns) {
+ return ntohs(ns);
+}
+#endif
#ifdef __WIN32__
# define TclUnixWaitForFile 0