diff options
| author | nijtmans <nijtmans> | 2010-03-07 14:39:25 (GMT) |
|---|---|---|
| committer | nijtmans <nijtmans> | 2010-03-07 14:39:25 (GMT) |
| commit | 646fc65d90e21ea34b47fee9ef22f8fbaf4e40ca (patch) | |
| tree | 613fc83e151efdbb14c37fbfb42d5f8aa355642d /win/tclWinDde.c | |
| parent | e0f4b9aef0aed9b336779d768d41cf8fba52f137 (diff) | |
| download | tcl-646fc65d90e21ea34b47fee9ef22f8fbaf4e40ca.zip tcl-646fc65d90e21ea34b47fee9ef22f8fbaf4e40ca.tar.gz tcl-646fc65d90e21ea34b47fee9ef22f8fbaf4e40ca.tar.bz2 | |
test that tclOO stubs are present in stub library
Applied missing part of [Patch 2961556]
Change all tclWinProcs signatures to use
TCHAR* in stead of WCHAR*. This is meant
as preparation to make [Enh 2965056]
possible at all.
Diffstat (limited to 'win/tclWinDde.c')
| -rw-r--r-- | win/tclWinDde.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/win/tclWinDde.c b/win/tclWinDde.c index 6fc902d..3421510 100644 --- a/win/tclWinDde.c +++ b/win/tclWinDde.c @@ -9,7 +9,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclWinDde.c,v 1.41 2010/02/25 23:39:50 dkf Exp $ + * RCS: @(#) $Id: tclWinDde.c,v 1.42 2010/03/07 14:39:25 nijtmans Exp $ */ #undef STATIC_BUILD @@ -991,7 +991,7 @@ DdeServicesOnAck( ATOM service = (ATOM)LOWORD(lParam); ATOM topic = (ATOM)HIWORD(lParam); struct DdeEnumServices *es; - TCHAR sz[255]; + char sz[255]; #ifdef _WIN64 es = (struct DdeEnumServices *) GetWindowLongPtr(hwnd, GWLP_USERDATA); @@ -1004,9 +1004,9 @@ DdeServicesOnAck( Tcl_Obj *matchPtr = Tcl_NewListObj(0, NULL); Tcl_Obj *resultPtr = Tcl_GetObjResult(es->interp); - GlobalGetAtomName(service, sz, 255); + GlobalGetAtomNameA(service, sz, 255); Tcl_ListObjAppendElement(NULL, matchPtr, Tcl_NewStringObj(sz, -1)); - GlobalGetAtomName(topic, sz, 255); + GlobalGetAtomNameA(topic, sz, 255); Tcl_ListObjAppendElement(NULL, matchPtr, Tcl_NewStringObj(sz, -1)); /* |