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 | df385e217a7d0a3810d67b89549f939c93c567a4 (patch) | |
| tree | fa0d5dec503d5ebb4bb134774ad9bf18a4e274a5 /unix | |
| parent | 04c711d93c0fb393700f04623dc86a63df96dfad (diff) | |
| download | tcl-df385e217a7d0a3810d67b89549f939c93c567a4.zip tcl-df385e217a7d0a3810d67b89549f939c93c567a4.tar.gz tcl-df385e217a7d0a3810d67b89549f939c93c567a4.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.
Diffstat (limited to 'unix')
| -rw-r--r-- | unix/tclUnixThrd.c | 1 |
1 files changed, 1 insertions, 0 deletions
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; } |