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 | e2635d6143eba18faa11cd18025a53f5ebd7620a (patch) | |
tree | aeafdbef2dab14e2fa3d351c16c36e8b2964d87a /generic/tclIORChan.c | |
parent | 8030552fb8970dd2d0540e66f4b9f33557d8e78e (diff) | |
download | tcl-e2635d6143eba18faa11cd18025a53f5ebd7620a.zip tcl-e2635d6143eba18faa11cd18025a53f5ebd7620a.tar.gz tcl-e2635d6143eba18faa11cd18025a53f5ebd7620a.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); |