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 | 50a8e5953a346e641c8c8b10fe1bb5010f26c1dc (patch) | |
tree | 2a421599a0603d3240ad97f01dd612a8877aad58 /generic/tclThread.c | |
parent | 41107649bba64d4a990d11c0f5c0fa33ed86b66c (diff) | |
parent | e98db3a11856540e4e8e222fdb2fb6a0d16e8480 (diff) | |
download | tcl-50a8e5953a346e641c8c8b10fe1bb5010f26c1dc.zip tcl-50a8e5953a346e641c8c8b10fe1bb5010f26c1dc.tar.gz tcl-50a8e5953a346e641c8c8b10fe1bb5010f26c1dc.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. |