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 | 9177f9a41b86a565c0a13030b18456608cc5a0d2 (patch) | |
tree | 679f1017e76d0436284b6fd6ad417469b14b3394 | |
parent | 6ec16f5f96257f9a6ac5d507f8f19258c7ceaa28 (diff) | |
download | tcl-9177f9a41b86a565c0a13030b18456608cc5a0d2.zip tcl-9177f9a41b86a565c0a13030b18456608cc5a0d2.tar.gz tcl-9177f9a41b86a565c0a13030b18456608cc5a0d2.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); |