Tk Source Code

Check-in [ff392252]
Login

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

Overview
Comment:Fix [3588364] (hopefully)
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | core-8-5-branch
Files: files | file ages | folders
SHA1: ff3922525e61f25120d5251862318eaba045e2ed
User & Date: jan.nijtmans 2013-06-28 13:16:02
References
2013-06-28
13:17 Pending ticket [3588364f]: Crash on Tk dll plus 4 other changes artifact: 69e80b69 user: jan.nijtmans
Context
2013-07-02
07:25
Bug 32afa6e256: dirent64 check is incorrect in tcl.m4. Thanks to Brian Griffin. check-in: a4044295 user: jan.nijtmans tags: core-8-5-branch
2013-06-28
13:16
merge-mark check-in: 5606b8b7 user: jan.nijtmans tags: trunk
13:16
Fix [3588364] (hopefully) check-in: ff392252 user: jan.nijtmans tags: core-8-5-branch
11:17
Bug [2501278]: ttk::scale keyboard binding problem check-in: 3fec32a9 user: jan.nijtmans tags: core-8-5-branch
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to win/tkWin32Dll.c.

129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
	    /*
	     * Construct an EXCEPTION_REGISTRATION to protect the call to
	     * TkFinalize
	     */

	    "leaq	%[registration], %%rdx"		"\n\t"
	    "movq	%%gs:0,		%%rax"		"\n\t"
	    "movq	%%rax,		0x0(%%edx)"	"\n\t" /* link */
	    "leaq	1f,		%%rax"		"\n\t"
	    "movq	%%rax,		0x8(%%rdx)"	"\n\t" /* handler */
	    "movq	%%rbp,		0x10(%%rdx)"	"\n\t" /* ebp */
	    "movq	%%rsp,		0x18(%%rdx)"	"\n\t" /* esp */
	    "movl	%[error],	0x20(%%rdx)"	"\n\t" /* status */

	    /*
	     * Link the EXCEPTION_REGISTRATION on the chain
	     */

	    "movq	%%rdx,		%%gs:0"		"\n\t"







|


|
|







129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
	    /*
	     * Construct an EXCEPTION_REGISTRATION to protect the call to
	     * TkFinalize
	     */

	    "leaq	%[registration], %%rdx"		"\n\t"
	    "movq	%%gs:0,		%%rax"		"\n\t"
	    "movq	%%rax,		0x0(%%rdx)"	"\n\t" /* link */
	    "leaq	1f,		%%rax"		"\n\t"
	    "movq	%%rax,		0x8(%%rdx)"	"\n\t" /* handler */
	    "movq	%%rbp,		0x10(%%rdx)"	"\n\t" /* rbp */
	    "movq	%%rsp,		0x18(%%rdx)"	"\n\t" /* rsp */
	    "movl	%[error],	0x20(%%rdx)"	"\n\t" /* status */

	    /*
	     * Link the EXCEPTION_REGISTRATION on the chain
	     */

	    "movq	%%rdx,		%%gs:0"		"\n\t"