summaryrefslogtreecommitdiffstats
path: root/generic/tclThreadTest.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2018-03-15 21:53:00 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2018-03-15 21:53:00 (GMT)
commitdb41a49d9cd891820e877f97e213d478d1ce6e1d (patch)
treed336ccb6018daac740c9e216c5a735f7196907a8 /generic/tclThreadTest.c
parent69868ee129e5fe87ad3e38afa7b92208974af881 (diff)
parentdf06afadcfb949909d6a640b77fe234e266dc848 (diff)
downloadtcl-db41a49d9cd891820e877f97e213d478d1ce6e1d.zip
tcl-db41a49d9cd891820e877f97e213d478d1ce6e1d.tar.gz
tcl-db41a49d9cd891820e877f97e213d478d1ce6e1d.tar.bz2
merge 8.7
Diffstat (limited to 'generic/tclThreadTest.c')
-rw-r--r--generic/tclThreadTest.c4
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++;