summaryrefslogtreecommitdiffstats
path: root/generic/tclIORChan.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2023-10-11 09:15:09 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2023-10-11 09:15:09 (GMT)
commita64802e7ede7f1794273c96ae87b61920c268964 (patch)
tree24d1484af5a2584a55a6c2e360b47f80acf48038 /generic/tclIORChan.c
parent9d1989bb3d587463c572ff5d4dd49ec042c68d19 (diff)
downloadtcl-a64802e7ede7f1794273c96ae87b61920c268964.zip
tcl-a64802e7ede7f1794273c96ae87b61920c268964.tar.gz
tcl-a64802e7ede7f1794273c96ae87b61920c268964.tar.bz2
Remove typecasts, just define directly as Tcl_FreeProc
Diffstat (limited to 'generic/tclIORChan.c')
-rw-r--r--generic/tclIORChan.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/generic/tclIORChan.c b/generic/tclIORChan.c
index 792cf80..69a8e11 100644
--- a/generic/tclIORChan.c
+++ b/generic/tclIORChan.c
@@ -430,7 +430,7 @@ static Tcl_Obj * DecodeEventMask(int mask);
static ReflectedChannel * NewReflectedChannel(Tcl_Interp *interp,
Tcl_Obj *cmdpfxObj, int mode, Tcl_Obj *handleObj);
static Tcl_Obj * NextHandle(void);
-static void FreeReflectedChannel(void *blockPtr);
+static Tcl_FreeProc FreeReflectedChannel;
static int InvokeTclMethod(ReflectedChannel *rcPtr,
MethodName method, Tcl_Obj *argOneObj,
Tcl_Obj *argTwoObj, Tcl_Obj **resultObjPtr);
@@ -1170,7 +1170,7 @@ ReflectClose(
ckfree((char *)tctPtr);
((Channel *)rcPtr->chan)->typePtr = NULL;
}
- Tcl_EventuallyFree(rcPtr, (Tcl_FreeProc *)(void *)FreeReflectedChannel);
+ Tcl_EventuallyFree(rcPtr, FreeReflectedChannel);
return EOK;
}
@@ -1239,7 +1239,7 @@ ReflectClose(
ckfree((char *)tctPtr);
((Channel *)rcPtr->chan)->typePtr = NULL;
}
- Tcl_EventuallyFree(rcPtr, (Tcl_FreeProc *)(void *)FreeReflectedChannel);
+ Tcl_EventuallyFree(rcPtr, FreeReflectedChannel);
return (result == TCL_OK) ? EOK : EINVAL;
}
@@ -2210,7 +2210,7 @@ NextHandle(void)
static void
FreeReflectedChannel(
- void *blockPtr)
+ char *blockPtr)
{
ReflectedChannel *rcPtr = (ReflectedChannel *) blockPtr;
Channel *chanPtr = (Channel *) rcPtr->chan;