summaryrefslogtreecommitdiffstats
path: root/generic/tclThreadTest.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2017-03-24 10:30:56 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2017-03-24 10:30:56 (GMT)
commit8a2c820213312ae39df29ae3f0f3d7ef83e6d4a3 (patch)
tree4048009aa7134f488430dfd31bb6023ac67b629b /generic/tclThreadTest.c
parentf55296bdf01aad11441825c162f074824f3031b5 (diff)
parentab08379d1c20b87f25e17de1c9e8bac2b0360e47 (diff)
downloadtcl-8a2c820213312ae39df29ae3f0f3d7ef83e6d4a3.zip
tcl-8a2c820213312ae39df29ae3f0f3d7ef83e6d4a3.tar.gz
tcl-8a2c820213312ae39df29ae3f0f3d7ef83e6d4a3.tar.bz2
Merge trunk
Diffstat (limited to 'generic/tclThreadTest.c')
-rw-r--r--generic/tclThreadTest.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclThreadTest.c b/generic/tclThreadTest.c
index 1a05f80..5bb0165 100644
--- a/generic/tclThreadTest.c
+++ b/generic/tclThreadTest.c
@@ -655,7 +655,7 @@ ThreadErrorProc(
char *script;
char buf[TCL_DOUBLE_SPACE+1];
- sprintf(buf, "%" TCL_LL_MODIFIER "d", (Tcl_WideInt)(size_t)Tcl_GetCurrentThread());
+ sprintf(buf, "%p", Tcl_GetCurrentThread());
errorInfo = Tcl_GetVar2(interp, "errorInfo", NULL, TCL_GLOBAL_ONLY);
if (errorProcString == NULL) {