From e32765f9cc3dae186aa1ddf4f395280ce115c9b3 Mon Sep 17 00:00:00 2001 From: "jan.nijtmans" Date: Wed, 25 Apr 2012 11:08:32 +0000 Subject: truncation in SetWindowLongPtr data --- win/tclWinDde.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/win/tclWinDde.c b/win/tclWinDde.c index 0d5f7d7..291a244 100644 --- a/win/tclWinDde.c +++ b/win/tclWinDde.c @@ -814,9 +814,9 @@ DdeClientWindowProc(HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam) ddeEnumServices *es; es = (ddeEnumServices*)lpcs->lpCreateParams; #ifdef _WIN64 - SetWindowLongPtr(hwnd, GWLP_USERDATA, (long)es); + SetWindowLongPtr(hwnd, GWLP_USERDATA, (LONG_PTR) es); #else - SetWindowLong(hwnd, GWL_USERDATA, (long)es); + SetWindowLong(hwnd, GWL_USERDATA, (LONG) es); #endif break; } -- cgit v0.12 From 1de31d745e8ee5370417e15a8784bc72ac4f54dd Mon Sep 17 00:00:00 2001 From: "jan.nijtmans" Date: Thu, 26 Apr 2012 10:43:30 +0000 Subject: fix crash on Mac OSX --- generic/tclStubInit.c | 3 --- 1 file changed, 3 deletions(-) diff --git a/generic/tclStubInit.c b/generic/tclStubInit.c index 8a85919..787fd4a 100644 --- a/generic/tclStubInit.c +++ b/generic/tclStubInit.c @@ -221,9 +221,6 @@ Tcl_WinTCharToUtf( # define TclWinFlushDirtyChannels 0 # define TclWinResetInterfaces 0 # define TclpGetPid 0 -# define TclMacOSXGetFileAttribute 0 /* Only implemented in Tcl >= 8.5 */ -# define TclMacOSXMatchType 0 /* Only implemented in Tcl >= 8.5 */ -# define TclMacOSXNotifierAddRunLoopMode 0 /* Only implemented in Tcl >= 8.5 */ # ifndef MAC_OSX_TCL # define Tcl_MacOSXOpenBundleResources 0 # define Tcl_MacOSXOpenVersionedBundleResources 0 -- cgit v0.12