diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-05-13 09:09:05 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-05-13 09:09:05 (GMT) |
commit | 3a20c7912b73ddd6dac080f250140bd0f3a90672 (patch) | |
tree | 0524e9e7a01035d17cec8a1b167278da80ab2be8 /win | |
parent | e0c7416333bb3f719f48ebe858c967ad0589ff91 (diff) | |
parent | 008944a5c3f048f975c96b5528e8ede18ce1d2fc (diff) | |
download | tcl-3a20c7912b73ddd6dac080f250140bd0f3a90672.zip tcl-3a20c7912b73ddd6dac080f250140bd0f3a90672.tar.gz tcl-3a20c7912b73ddd6dac080f250140bd0f3a90672.tar.bz2 |
Merge core-8-6-branch
Diffstat (limited to 'win')
-rw-r--r-- | win/tclWinReg.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/win/tclWinReg.c b/win/tclWinReg.c index a3bcc81..5f7fd31 100644 --- a/win/tclWinReg.c +++ b/win/tclWinReg.c @@ -1425,8 +1425,8 @@ BroadcastValue( Tcl_DStringFree(&ds); objPtr = Tcl_NewObj(); - Tcl_ListObjAppendElement(NULL, objPtr, Tcl_NewLongObj((long) result)); - Tcl_ListObjAppendElement(NULL, objPtr, Tcl_NewLongObj((long) sendResult)); + Tcl_ListObjAppendElement(NULL, objPtr, Tcl_NewWideIntObj((Tcl_WideInt) result)); + Tcl_ListObjAppendElement(NULL, objPtr, Tcl_NewWideIntObj((Tcl_WideInt) sendResult)); Tcl_SetObjResult(interp, objPtr); return TCL_OK; |