summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2012-08-23 20:06:18 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2012-08-23 20:06:18 (GMT)
commitb02e97a2b368aa22f4d35a51ab1d3efdf197352b (patch)
treed760b8eee9a5a9d210d8ef2833c6c46c399e5970
parent77e356e2cee812b76dd325d0f34ad239eb75f82a (diff)
downloadtcl-b02e97a2b368aa22f4d35a51ab1d3efdf197352b.zip
tcl-b02e97a2b368aa22f4d35a51ab1d3efdf197352b.tar.gz
tcl-b02e97a2b368aa22f4d35a51ab1d3efdf197352b.tar.bz2
small wrapper for TclWinNToHs, for change in calling convention
-rw-r--r--generic/tclStubInit.c7
1 files changed, 6 insertions, 1 deletions
diff --git a/generic/tclStubInit.c b/generic/tclStubInit.c
index 3be6b45..6a3207b 100644
--- a/generic/tclStubInit.c
+++ b/generic/tclStubInit.c
@@ -74,7 +74,12 @@ MODULE_SCOPE TclIntPlatStubs tclIntPlatStubs;
MODULE_SCOPE TclPlatStubs tclPlatStubs;
MODULE_SCOPE TclStubs tclStubs;
MODULE_SCOPE TclTomMathStubs tclTomMathStubs;
-#define TclWinNToHS ntohs
+
+#if defined(_WIN32) || defined(__CYGWIN__)
+unsigned short TclWinNToHS(unsigned short ns) {
+ return ntohs(ns);
+}
+#endif
#ifdef __WIN32__
# define TclUnixWaitForFile 0