diff options
| author | dgp <dgp@users.sourceforge.net> | 2018-03-15 14:06:52 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2018-03-15 14:06:52 (GMT) |
| commit | 47152d94c197241698dc4fd03322b6694b25d2d4 (patch) | |
| tree | 2ac7affdbbf5610b73d47d78435e28789065a723 /generic/tclThreadTest.c | |
| parent | 1dd89810eb1cba2b78eeeb42df4c3e966a55102e (diff) | |
| parent | aa199edba612a516e6309290fb6dc4442a49a5ee (diff) | |
| download | tcl-47152d94c197241698dc4fd03322b6694b25d2d4.zip tcl-47152d94c197241698dc4fd03322b6694b25d2d4.tar.gz tcl-47152d94c197241698dc4fd03322b6694b25d2d4.tar.bz2 | |
merge 8.7
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 9c5fecb..a008799 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++; |