diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-01-26 00:24:07 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-01-26 00:24:07 (GMT) |
| commit | 13e6c44129865089d8680474141354555450ae04 (patch) | |
| tree | cd1af88f02192ab59b05cebb82e886341624241e /generic/tkBusy.c | |
| parent | 8e4cfc592771290d75f559ef2dea0836cc26e7fe (diff) | |
| download | tk-13e6c44129865089d8680474141354555450ae04.zip tk-13e6c44129865089d8680474141354555450ae04.tar.gz tk-13e6c44129865089d8680474141354555450ae04.tar.bz2 | |
Use some more (void *)'s in FreeProc's, a step in the direction getting Tk to work with "novem"
Diffstat (limited to 'generic/tkBusy.c')
| -rw-r--r-- | generic/tkBusy.c | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/generic/tkBusy.c b/generic/tkBusy.c index 7aeae74..65248a2 100644 --- a/generic/tkBusy.c +++ b/generic/tkBusy.c @@ -43,7 +43,7 @@ static void BusyCustodyProc(ClientData clientData, static int ConfigureBusy(Tcl_Interp *interp, Busy *busyPtr, int objc, Tcl_Obj *const objv[]); static Busy * CreateBusy(Tcl_Interp *interp, Tk_Window tkRef); -static void DestroyBusy(char *dataPtr); +static void DestroyBusy(void *dataPtr); static void DoConfigureNotify(Tk_FakeWin *winPtr); static inline Tk_Window FirstChild(Tk_Window parent); static Busy * GetBusy(Tcl_Interp *interp, @@ -136,7 +136,7 @@ BusyCustodyProc( busyPtr); TkpHideBusyWindow(busyPtr); busyPtr->tkBusy = NULL; - Tcl_EventuallyFree(busyPtr, DestroyBusy); + Tcl_EventuallyFree(busyPtr, (Tcl_FreeProc *)DestroyBusy); } /* @@ -262,7 +262,7 @@ RefWinEventProc( * Arrange for the busy structure to be removed at a proper time. */ - Tcl_EventuallyFree(busyPtr, DestroyBusy); + Tcl_EventuallyFree(busyPtr, (Tcl_FreeProc *)DestroyBusy); break; case ConfigureNotify: @@ -333,9 +333,9 @@ RefWinEventProc( static void DestroyBusy( - char *data) /* Busy window structure record */ + void *data) /* Busy window structure record */ { - register Busy *busyPtr = (Busy *) data; + register Busy *busyPtr = data; if (busyPtr->hashPtr != NULL) { Tcl_DeleteHashEntry(busyPtr->hashPtr); @@ -383,7 +383,7 @@ BusyEventProc( if (eventPtr->type == DestroyNotify) { busyPtr->tkBusy = NULL; - Tcl_EventuallyFree(busyPtr, DestroyBusy); + Tcl_EventuallyFree(busyPtr, (Tcl_FreeProc *)DestroyBusy); } } @@ -895,7 +895,7 @@ Tk_BusyObjCmd( return TCL_ERROR; } TkpHideBusyWindow(busyPtr); - Tcl_EventuallyFree(busyPtr, DestroyBusy); + Tcl_EventuallyFree(busyPtr, (Tcl_FreeProc *)DestroyBusy); return TCL_OK; case BUSY_HOLD: |