diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2018-02-22 20:09:33 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2018-02-22 20:09:33 (GMT) |
| commit | f5bf130f05e3dcf636ef831f017d5672c594660a (patch) | |
| tree | 7c04995cab36d1d34a587fabe207fa5018b31ccd /generic/tclThreadTest.c | |
| parent | 701d9dbe89519d8d52b18d0e20140395e8a13682 (diff) | |
| parent | 812174d5782d57e4dbe97e9a1e378a2a2a4eac1f (diff) | |
| download | tcl-f5bf130f05e3dcf636ef831f017d5672c594660a.zip tcl-f5bf130f05e3dcf636ef831f017d5672c594660a.tar.gz tcl-f5bf130f05e3dcf636ef831f017d5672c594660a.tar.bz2 | |
merge core-8-branch
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++; |