diff options
author | andreas_kupries <akupries@shaw.ca> | 2004-07-15 22:04:26 (GMT) |
---|---|---|
committer | andreas_kupries <akupries@shaw.ca> | 2004-07-15 22:04:26 (GMT) |
commit | 67b7d85c2dd267ed4ea308956907a48a2d186cca (patch) | |
tree | fa0d5dec503d5ebb4bb134774ad9bf18a4e274a5 | |
parent | f1672e88f2ba0cd791ed0ef2b4196696cf993c5c (diff) | |
download | tcl-67b7d85c2dd267ed4ea308956907a48a2d186cca.zip tcl-67b7d85c2dd267ed4ea308956907a48a2d186cca.tar.gz tcl-67b7d85c2dd267ed4ea308956907a48a2d186cca.tar.bz2 |
* unix/tclUnixThrd.c (TclpFinalizeMutex): Accepted Joe
Mistachkin's patch for [Tcl SF Bug 99453], closing leakage of
mutexes. They were not destroyed properly upon finalization.
-rw-r--r-- | ChangeLog | 6 | ||||
-rw-r--r-- | unix/tclUnixThrd.c | 1 |
2 files changed, 7 insertions, 0 deletions
@@ -1,3 +1,9 @@ +2004-07-15 Andreas Kupries <andreask@activestate.com> + + * unix/tclUnixThrd.c (TclpFinalizeMutex): Accepted Joe + Mistachkin's patch for [Tcl SF Bug 99453], closing leakage of + mutexes. They were not destroyed properly upon finalization. + 2004-07-15 Zoran Vasiljevic <vasiljevic@users.sf.net> * generic/tclEvent.c (NewThreadProc): Backout of changes diff --git a/unix/tclUnixThrd.c b/unix/tclUnixThrd.c index 78ca385..d300d34 100644 --- a/unix/tclUnixThrd.c +++ b/unix/tclUnixThrd.c @@ -494,6 +494,7 @@ TclpFinalizeMutex(mutexPtr) { pthread_mutex_t *pmutexPtr = *(pthread_mutex_t **)mutexPtr; if (pmutexPtr != NULL) { + pthread_mutex_destroy(pmutexPtr); ckfree((char *)pmutexPtr); *mutexPtr = NULL; } |