diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-01-25 13:07:06 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-01-25 13:07:06 (GMT) |
| commit | 4796adf5cb7dda39555411ea4941ab630f2eabec (patch) | |
| tree | 087b262ac3aceceff56cb74f9a2bfd67b85e9581 | |
| parent | 2c02c2ae5d892599247538f12315b137dbdeba59 (diff) | |
| download | tcl-4796adf5cb7dda39555411ea4941ab630f2eabec.zip tcl-4796adf5cb7dda39555411ea4941ab630f2eabec.tar.gz tcl-4796adf5cb7dda39555411ea4941ab630f2eabec.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); |