diff options
| author | jan.nijtmans <jan.nijtmans@noemail.net> | 2013-01-26 00:24:07 (GMT) |
|---|---|---|
| committer | jan.nijtmans <jan.nijtmans@noemail.net> | 2013-01-26 00:24:07 (GMT) |
| commit | 2bffd75c0ab69e169b7bdb7980d27ea3d80b99c9 (patch) | |
| tree | cd1af88f02192ab59b05cebb82e886341624241e /generic/tkListbox.c | |
| parent | 80da30843395be9facbb406ee428a103c68671b4 (diff) | |
| download | tk-2bffd75c0ab69e169b7bdb7980d27ea3d80b99c9.zip tk-2bffd75c0ab69e169b7bdb7980d27ea3d80b99c9.tar.gz tk-2bffd75c0ab69e169b7bdb7980d27ea3d80b99c9.tar.bz2 | |
Use some more (void *)'s in FreeProc's, a step in the direction getting Tk to work with "novem"
FossilOrigin-Name: 9279332cf22a8ceeda1fd9c3c47628f162e85972
Diffstat (limited to 'generic/tkListbox.c')
| -rw-r--r-- | generic/tkListbox.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/generic/tkListbox.c b/generic/tkListbox.c index 178147d..aad0163 100644 --- a/generic/tkListbox.c +++ b/generic/tkListbox.c @@ -392,7 +392,7 @@ static int ConfigureListboxItem(Tcl_Interp *interp, Tcl_Obj *const objv[], int index); static int ListboxDeleteSubCmd(Listbox *listPtr, int first, int last); -static void DestroyListbox(char *memPtr); +static void DestroyListbox(void *memPtr); static void DestroyListboxOptionTables(ClientData clientData, Tcl_Interp *interp); static void DisplayListbox(ClientData clientData); @@ -1428,9 +1428,9 @@ ListboxGetItemAttributes( static void DestroyListbox( - char *memPtr) /* Info about listbox widget. */ + void *memPtr) /* Info about listbox widget. */ { - register Listbox *listPtr = (Listbox *) memPtr; + register Listbox *listPtr = memPtr; Tcl_HashEntry *entry; Tcl_HashSearch search; @@ -2601,7 +2601,7 @@ ListboxEventProc( if (listPtr->flags & REDRAW_PENDING) { Tcl_CancelIdleCall(DisplayListbox, clientData); } - Tcl_EventuallyFree(clientData, DestroyListbox); + Tcl_EventuallyFree(clientData, (Tcl_FreeProc *) DestroyListbox); } } else if (eventPtr->type == ConfigureNotify) { int vertSpace; |