diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-10-11 15:05:34 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-10-11 15:05:34 (GMT) |
| commit | b53d86acf913b7508a1ac1b0d328fbacf4fa94ff (patch) | |
| tree | 2f8529a512f578339ff62195a2d1c693e9af4b03 /generic/tkEntry.c | |
| parent | d9c635b40f585244047e875ec066c04a97d4ed47 (diff) | |
| download | tk-b53d86acf913b7508a1ac1b0d328fbacf4fa94ff.zip tk-b53d86acf913b7508a1ac1b0d328fbacf4fa94ff.tar.gz tk-b53d86acf913b7508a1ac1b0d328fbacf4fa94ff.tar.bz2 | |
Do away with all those type-casts. Compatibility with 9.0 is still no issue
Diffstat (limited to 'generic/tkEntry.c')
| -rw-r--r-- | generic/tkEntry.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/generic/tkEntry.c b/generic/tkEntry.c index 19d0dff..4c342d1 100644 --- a/generic/tkEntry.c +++ b/generic/tkEntry.c @@ -396,7 +396,7 @@ static const char *const selElementNames[] = { static int ConfigureEntry(Tcl_Interp *interp, Entry *entryPtr, int objc, Tcl_Obj *const objv[]); static int DeleteChars(Entry *entryPtr, int index, int count); -static void DestroyEntry(void *memPtr); +static Tcl_FreeProc DestroyEntry; static void DisplayEntry(ClientData clientData); static void EntryBlinkProc(ClientData clientData); static void EntryCmdDeletedProc(ClientData clientData); @@ -1021,9 +1021,9 @@ EntryWidgetObjCmd( static void DestroyEntry( - void *memPtr) /* Info about entry widget. */ + char *memPtr) /* Info about entry widget. */ { - Entry *entryPtr = memPtr; + Entry *entryPtr = (Entry *)memPtr; /* * Free up all the stuff that requires special handling, then let @@ -2498,7 +2498,7 @@ EntryEventProc( if (entryPtr->flags & REDRAW_PENDING) { Tcl_CancelIdleCall(DisplayEntry, clientData); } - Tcl_EventuallyFree(clientData, (Tcl_FreeProc *)(void *)DestroyEntry); + Tcl_EventuallyFree(clientData, DestroyEntry); } break; case ConfigureNotify: |