Differences From Artifact [bd13a7b3c7]:

• File unix/tclUnixThrd.c — part of check-in [f7e8a16883] at 2004-06-23 00:24:31 on branch trunk — Version of [Patch 746578] that works with Linux and is likely to work elsewhere (user: dkf size: 23163)

To Artifact [ca741063f9]:

• File unix/tclUnixThrd.c — part of check-in [f4cc086246] at 2004-07-15 22:04:42 on branch trunk — * 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. (user: andreas_kupries size: 23205)

538
539
540
541
542
543
544

545
546
547
548
549
550
551

void
TclpFinalizeMutex(mutexPtr)
    Tcl_Mutex *mutexPtr;
{
    pthread_mutex_t *pmutexPtr = *(pthread_mutex_t **)mutexPtr;
    if (pmutexPtr != NULL) {

	ckfree((char *)pmutexPtr);
	*mutexPtr = NULL;
    }
}


/*

>

538
539
540
541
542
543
544
545
546
547
548
549
550
551
552

void
TclpFinalizeMutex(mutexPtr)
    Tcl_Mutex *mutexPtr;
{
    pthread_mutex_t *pmutexPtr = *(pthread_mutex_t **)mutexPtr;
    if (pmutexPtr != NULL) {
        pthread_mutex_destroy(pmutexPtr);
	ckfree((char *)pmutexPtr);
	*mutexPtr = NULL;
    }
}


/*