diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2012-08-23 20:06:18 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2012-08-23 20:06:18 (GMT) |
| commit | 1b1df98eb9755670524e036036bb887b86df8079 (patch) | |
| tree | d760b8eee9a5a9d210d8ef2833c6c46c399e5970 | |
| parent | b3f490fa84391bd5d1cd9ff82d6235e527a22c28 (diff) | |
| download | tcl-1b1df98eb9755670524e036036bb887b86df8079.zip tcl-1b1df98eb9755670524e036036bb887b86df8079.tar.gz tcl-1b1df98eb9755670524e036036bb887b86df8079.tar.bz2 | |
small wrapper for TclWinNToHs, for change in calling convention
| -rw-r--r-- | generic/tclStubInit.c | 7 |
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 |