diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-01-25 13:07:59 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-01-25 13:07:59 (GMT) |
| commit | 3cf091e2d8b739ba3dfaabe7e178b28abe80e00e (patch) | |
| tree | 679f1017e76d0436284b6fd6ad417469b14b3394 | |
| parent | 328fa692fbd773527e3f656e71f312717a9daed9 (diff) | |
| download | tcl-3cf091e2d8b739ba3dfaabe7e178b28abe80e00e.zip tcl-3cf091e2d8b739ba3dfaabe7e178b28abe80e00e.tar.gz tcl-3cf091e2d8b739ba3dfaabe7e178b28abe80e00e.tar.bz2 | |
Another memory leak, and one Tcl_Free -> ckfree
| -rw-r--r-- | generic/tclThreadTest.c | 1 | ||||
| -rw-r--r-- | unix/tclUnixTime.c | 2 |
2 files changed, 2 insertions, 1 deletions
diff --git a/generic/tclThreadTest.c b/generic/tclThreadTest.c index 1115ff0..8708f9a 100644 --- a/generic/tclThreadTest.c +++ b/generic/tclThreadTest.c @@ -930,6 +930,7 @@ ThreadSend( Tcl_ConditionFinalize(&resultPtr->done); code = resultPtr->code; + ckfree(resultPtr->result); ckfree(resultPtr); return code; diff --git a/unix/tclUnixTime.c b/unix/tclUnixTime.c index c7921fe..926e8f4 100644 --- a/unix/tclUnixTime.c +++ b/unix/tclUnixTime.c @@ -503,7 +503,7 @@ SetTZIfNecessary(void) if (lastTZ == NULL) { Tcl_CreateExitHandler(CleanupMemory, NULL); } else { - Tcl_Free(lastTZ); + ckfree(lastTZ); } lastTZ = ckalloc(strlen(newTZ) + 1); strcpy(lastTZ, newTZ); |