diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2015-08-19 11:26:52 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2015-08-19 11:26:52 (GMT) |
| commit | 023624c3c93c61c06e6b5a70f6f86ae0105cadf3 (patch) | |
| tree | 2a421599a0603d3240ad97f01dd612a8877aad58 /generic/tclThread.c | |
| parent | b8a93e84238b33a7e2a1cb5503d3e784f7723150 (diff) | |
| parent | da2329ba8bd05643596e9747d40e5ece018a79f7 (diff) | |
| download | tcl-023624c3c93c61c06e6b5a70f6f86ae0105cadf3.zip tcl-023624c3c93c61c06e6b5a70f6f86ae0105cadf3.tar.gz tcl-023624c3c93c61c06e6b5a70f6f86ae0105cadf3.tar.bz2 | |
merge trunk.
Remove now unused internal functions.
Diffstat (limited to 'generic/tclThread.c')
| -rw-r--r-- | generic/tclThread.c | 37 |
1 files changed, 0 insertions, 37 deletions
diff --git a/generic/tclThread.c b/generic/tclThread.c index c2112b7..198fa6a 100644 --- a/generic/tclThread.c +++ b/generic/tclThread.c @@ -284,43 +284,6 @@ Tcl_MutexFinalize( /* *---------------------------------------------------------------------- * - * TclMutexUnlockAndFinalize -- - * - * This procedure is invoked to unlock and then finalize a mutex. - * The mutex must have been locked by Tcl_MutexLock. It is also - * removed from the list of remembered objects. The mutex can no - * longer be used after calling this procedure. - * - * Results: - * None. - * - * Side effects: - * Remove the mutex from the list. - * - *---------------------------------------------------------------------- - */ - -void -TclMutexUnlockAndFinalize( - Tcl_Mutex *mutexPtr) -{ - Tcl_Mutex mutex; - TclpMasterLock(); - TclpMutexLock(); -#ifdef TCL_THREADS - mutex = *mutexPtr; - *mutexPtr = NULL; /* Force it to be created again. */ - Tcl_MutexUnlock(&mutex); - TclpFinalizeMutex(&mutex); -#endif - ForgetSyncObject(mutexPtr, &mutexRecord); - TclpMutexUnlock(); - TclpMasterUnlock(); -} - -/* - *---------------------------------------------------------------------- - * * TclRememberCondition * * Keep a list of condition variables used during finalization. |
