diff options
| author | sebres <sebres@users.sourceforge.net> | 2018-05-29 17:58:53 (GMT) |
|---|---|---|
| committer | sebres <sebres@users.sourceforge.net> | 2018-05-29 17:58:53 (GMT) |
| commit | 83a8197fe9d38bd55cb7ee1d5dfd4ea2b8415c93 (patch) | |
| tree | 24752b41caa67f4f7176f5482c1921f3c6943eab /generic/tclThreadTest.c | |
| parent | 153e32d613b99001ad5c711314c0702372d1d273 (diff) | |
| parent | a2ce3dab9b2939f21c06358081d0977ec937e106 (diff) | |
| download | tcl-83a8197fe9d38bd55cb7ee1d5dfd4ea2b8415c93.zip tcl-83a8197fe9d38bd55cb7ee1d5dfd4ea2b8415c93.tar.gz tcl-83a8197fe9d38bd55cb7ee1d5dfd4ea2b8415c93.tar.bz2 | |
back-porting of tclclockmod done, merge current 8.6
Diffstat (limited to 'generic/tclThreadTest.c')
| -rw-r--r-- | generic/tclThreadTest.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclThreadTest.c b/generic/tclThreadTest.c index fcf3880..6fc0e52 100644 --- a/generic/tclThreadTest.c +++ b/generic/tclThreadTest.c @@ -248,7 +248,7 @@ ThreadObjCmd( switch ((enum options)option) { case THREAD_CANCEL: { - long id; + Tcl_WideInt id; const char *result; int flags, arg; @@ -264,7 +264,7 @@ ThreadObjCmd( arg++; } } - if (Tcl_GetLongFromObj(interp, objv[arg], &id) != TCL_OK) { + if (Tcl_GetWideIntFromObj(interp, objv[arg], &id) != TCL_OK) { return TCL_ERROR; } arg++; |