diff options
| author | Kevin Walzer <kw@codebykevin.com> | 2019-09-24 12:34:42 (GMT) |
|---|---|---|
| committer | Kevin Walzer <kw@codebykevin.com> | 2019-09-24 12:34:42 (GMT) |
| commit | b5942485c76bfda6223b6c9eaec84813e6d2e3f9 (patch) | |
| tree | 3b88d072917b6b748246d0c472190c140026d5e9 /unix | |
| parent | cd20edbb665c16909bbd2a4e4f883d84c05892da (diff) | |
| parent | 93a3e63b7e9a22f94f1101b7ba32ac79738e5b65 (diff) | |
| download | tk-b5942485c76bfda6223b6c9eaec84813e6d2e3f9.zip tk-b5942485c76bfda6223b6c9eaec84813e6d2e3f9.tar.gz tk-b5942485c76bfda6223b6c9eaec84813e6d2e3f9.tar.bz2 | |
Merge 8.6
Diffstat (limited to 'unix')
| -rw-r--r-- | unix/tkUnixWm.c | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/unix/tkUnixWm.c b/unix/tkUnixWm.c index 7b69713..f09b59c 100644 --- a/unix/tkUnixWm.c +++ b/unix/tkUnixWm.c @@ -1871,6 +1871,7 @@ WmFrameCmd( { register WmInfo *wmPtr = winPtr->wmInfoPtr; Window window; + char buf[TCL_INTEGER_SPACE]; if (objc != 3) { Tcl_WrongNumArgs(interp, 2, objv, "window"); @@ -1880,7 +1881,8 @@ WmFrameCmd( if (window == None) { window = Tk_WindowId((Tk_Window) winPtr); } - Tcl_SetObjResult(interp, Tcl_ObjPrintf("0x%x", (unsigned) window)); + sprintf(buf, "0x%" TCL_Z_MODIFIER "x", (size_t)window); + Tcl_SetObjResult(interp, Tcl_NewStringObj(buf, -1)); return TCL_OK; } |