diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-09-12 11:26:49 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-09-12 11:26:49 (GMT) |
| commit | c73f421606da6ee1f688a42a8de9a5807ea51a4f (patch) | |
| tree | 3a570f80dd679c3d8150a0e97785894dba099dba /generic/tclUtil.c | |
| parent | 5783fb31974b4c24b19f466511ad1e5944599678 (diff) | |
| parent | eaefc3bdf38a0256fca08f8d0b9a2a137cf8706e (diff) | |
| download | tcl-c73f421606da6ee1f688a42a8de9a5807ea51a4f.zip tcl-c73f421606da6ee1f688a42a8de9a5807ea51a4f.tar.gz tcl-c73f421606da6ee1f688a42a8de9a5807ea51a4f.tar.bz2 | |
Merge 8.6
Diffstat (limited to 'generic/tclUtil.c')
| -rw-r--r-- | generic/tclUtil.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tclUtil.c b/generic/tclUtil.c index 8bf3eb3..c5c816f 100644 --- a/generic/tclUtil.c +++ b/generic/tclUtil.c @@ -4399,7 +4399,7 @@ TclSetProcessGlobalValue( Tcl_IncrRefCount(newValue); cacheMap = GetThreadHash(&pgvPtr->key); ClearHash(cacheMap); - hPtr = Tcl_CreateHashEntry(cacheMap, (void *)(size_t)(pgvPtr->epoch), &dummy); + hPtr = Tcl_CreateHashEntry(cacheMap, INT2PTR(pgvPtr->epoch), &dummy); Tcl_SetHashValue(hPtr, newValue); Tcl_MutexUnlock(&pgvPtr->mutex); } @@ -4459,7 +4459,7 @@ TclGetProcessGlobalValue( } } cacheMap = GetThreadHash(&pgvPtr->key); - hPtr = Tcl_FindHashEntry(cacheMap, (void *)(size_t)epoch); + hPtr = Tcl_FindHashEntry(cacheMap, INT2PTR(epoch)); if (NULL == hPtr) { int dummy; @@ -4492,7 +4492,7 @@ TclGetProcessGlobalValue( value = Tcl_NewStringObj(pgvPtr->value, pgvPtr->numBytes); hPtr = Tcl_CreateHashEntry(cacheMap, - (void *)(size_t)(pgvPtr->epoch), &dummy); + INT2PTR(pgvPtr->epoch), &dummy); Tcl_MutexUnlock(&pgvPtr->mutex); Tcl_SetHashValue(hPtr, value); Tcl_IncrRefCount(value); |