diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2017-04-14 13:00:46 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2017-04-14 13:00:46 (GMT) |
| commit | f596ce75b4b1eeb5b09785d3faf012d4a4587f42 (patch) | |
| tree | 4078b1f733e2bb22b44c818b5618411601ebf791 /generic/tclThreadTest.c | |
| parent | cbe925ed316598fcf5e87acdd7c1f8cf8b244f8b (diff) | |
| parent | 1bfdefdad35caeaff3dcdfea5f35c70373332bb0 (diff) | |
| download | tcl-f596ce75b4b1eeb5b09785d3faf012d4a4587f42.zip tcl-f596ce75b4b1eeb5b09785d3faf012d4a4587f42.tar.gz tcl-f596ce75b4b1eeb5b09785d3faf012d4a4587f42.tar.bz2 | |
merge trunk
Diffstat (limited to 'generic/tclThreadTest.c')
| -rw-r--r-- | generic/tclThreadTest.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclThreadTest.c b/generic/tclThreadTest.c index 5bb0165..9c5fecb 100644 --- a/generic/tclThreadTest.c +++ b/generic/tclThreadTest.c @@ -341,7 +341,7 @@ ThreadObjCmd( } else if (objc == 3 && strcmp("-main", Tcl_GetString(objv[2])) == 0) { Tcl_MutexLock(&threadMutex); - idObj = Tcl_NewLongObj((long)(size_t)mainThreadId); + idObj = Tcl_NewWideIntObj((Tcl_WideInt)(size_t)mainThreadId); Tcl_MutexUnlock(&threadMutex); } else { Tcl_WrongNumArgs(interp, 2, objv, NULL); |