diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2018-10-22 17:58:56 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2018-10-22 17:58:56 (GMT) |
| commit | e9eb4fec4431e0edf6242aaa62a9196d2bfced0c (patch) | |
| tree | 882df035260b33df10da999f9cdb014d62d85500 /win/tkWinColor.c | |
| parent | 8af6259af6c2bda3d4c3b16266e5bcbbf25876a2 (diff) | |
| download | tk-e9eb4fec4431e0edf6242aaa62a9196d2bfced0c.zip tk-e9eb4fec4431e0edf6242aaa62a9196d2bfced0c.tar.gz tk-e9eb4fec4431e0edf6242aaa62a9196d2bfced0c.tar.bz2 | |
Fix PTR2INT/PTR2UINT, so they no longer are restricted to the "int" range.
Make TCL_Z_MODIFIER available in Tk (even when compiled with Tcl 8.6), and use it.
More size_t/clientData related improvements
Diffstat (limited to 'win/tkWinColor.c')
| -rw-r--r-- | win/tkWinColor.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/win/tkWinColor.c b/win/tkWinColor.c index ba9815c..5540d9a 100644 --- a/win/tkWinColor.c +++ b/win/tkWinColor.c @@ -364,7 +364,7 @@ XAllocColor( } else { refCount = (size_t)Tcl_GetHashValue(entryPtr) + 1; } - Tcl_SetHashValue(entryPtr, (void *)refCount); + Tcl_SetHashValue(entryPtr, INT2PTR(refCount)); } else { /* * Determine what color will actually be used on non-colormap systems. @@ -446,7 +446,7 @@ XFreeColors( } Tcl_DeleteHashEntry(entryPtr); } else { - Tcl_SetHashValue(entryPtr, (size_t)refCount); + Tcl_SetHashValue(entryPtr, INT2PTR(refCount)); } } } |