Tcl Source Code

Check-in [624e7971f7]
Login

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:small wrapper for TclWinNToHs, for change in calling convention
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | core-8-5-branch
Files: files | file ages | folders
SHA1: 624e7971f7e0c43d9893738fa9c3b50528326277
User & Date: jan.nijtmans 2012-08-23 20:06:18
Context
2012-08-24
06:29
make sure that extensions which might still use TclWinNToHS, now use ntohs directly. check-in: f66713fc65 user: jan.nijtmans tags: core-8-5-branch
2012-08-23
20:18
small wrapper for TclWinNToHs, for change in calling convention check-in: 65be206be4 user: jan.nijtmans tags: trunk
20:06
small wrapper for TclWinNToHs, for change in calling convention check-in: 624e7971f7 user: jan.nijtmans tags: core-8-5-branch
12:07
[Bug 3496014] Protect Tcl_SetByteArrayObj for invalid values (Backported from Tcl 8.6) check-in: 268122a79b user: jan.nijtmans tags: core-8-5-branch
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to generic/tclStubInit.c.

70
71
72
73
74
75
76
77





78
79
80
81
82
83
84
#endif

MODULE_SCOPE TclIntStubs tclIntStubs;
MODULE_SCOPE TclIntPlatStubs tclIntPlatStubs;
MODULE_SCOPE TclPlatStubs tclPlatStubs;
MODULE_SCOPE TclStubs tclStubs;
MODULE_SCOPE TclTomMathStubs tclTomMathStubs;
#define TclWinNToHS ntohs






#ifdef __WIN32__
#   define TclUnixWaitForFile 0
#   define TclUnixCopyFile 0
#   define TclpReaddir 0
#   define TclpIsAtty 0
#elif defined(__CYGWIN__)







|
>
>
>
>
>







70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
#endif

MODULE_SCOPE TclIntStubs tclIntStubs;
MODULE_SCOPE TclIntPlatStubs tclIntPlatStubs;
MODULE_SCOPE TclPlatStubs tclPlatStubs;
MODULE_SCOPE TclStubs tclStubs;
MODULE_SCOPE TclTomMathStubs tclTomMathStubs;

#if defined(_WIN32) || defined(__CYGWIN__)
unsigned short TclWinNToHS(unsigned short ns) {
	return ntohs(ns);
}
#endif

#ifdef __WIN32__
#   define TclUnixWaitForFile 0
#   define TclUnixCopyFile 0
#   define TclpReaddir 0
#   define TclpIsAtty 0
#elif defined(__CYGWIN__)