diff options
| author | dgp <dgp@users.sourceforge.net> | 2011-09-19 20:30:56 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2011-09-19 20:30:56 (GMT) |
| commit | b2d8f2f53a4c541485707a0015868968d58437e1 (patch) | |
| tree | aeafdbef2dab14e2fa3d351c16c36e8b2964d87a /generic/tclIORChan.c | |
| parent | 36df90e802760edfaa0df34ce95c04ff0b16a2f3 (diff) | |
| download | tcl-b2d8f2f53a4c541485707a0015868968d58437e1.zip tcl-b2d8f2f53a4c541485707a0015868968d58437e1.tar.gz tcl-b2d8f2f53a4c541485707a0015868968d58437e1.tar.bz2 | |
Conversion from [testthread] to Thread package stops most memory leaks.
Diffstat (limited to 'generic/tclIORChan.c')
| -rw-r--r-- | generic/tclIORChan.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/generic/tclIORChan.c b/generic/tclIORChan.c index da6f642..61c8475 100644 --- a/generic/tclIORChan.c +++ b/generic/tclIORChan.c @@ -439,6 +439,7 @@ static ReflectedChannel * NewReflectedChannel(Tcl_Interp *interp, Tcl_Obj *cmdpfxObj, int mode, Tcl_Obj *handleObj); static Tcl_Obj * NextHandle(void); static void FreeReflectedChannel(ReflectedChannel *rcPtr); +static void FreeReflectedChannelArgs(ReflectedChannel *rcPtr); static int InvokeTclMethod(ReflectedChannel *rcPtr, const char *method, Tcl_Obj *argOneObj, Tcl_Obj *argTwoObj, Tcl_Obj **resultObjPtr); |