diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2015-09-24 10:54:07 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2015-09-24 10:54:07 (GMT) |
commit | 2101ef45be45e0aa88d3e8c9725df9ca92309fe9 (patch) | |
tree | 3552bbb539fdc3bd92e752345c554eeee27d648b /generic | |
parent | 61ad28e5b697aee8b22a823efd9333905ce1e787 (diff) | |
parent | 0f2b1bbb2e2b5d7c124d12df2e73a90c119390a4 (diff) | |
download | tcl-2101ef45be45e0aa88d3e8c9725df9ca92309fe9.zip tcl-2101ef45be45e0aa88d3e8c9725df9ca92309fe9.tar.gz tcl-2101ef45be45e0aa88d3e8c9725df9ca92309fe9.tar.bz2 |
Fix [5d170b5ca5e12743006d737c79f959f3efabc644|5d170b5ca5]: checkin 9f8b7bea5344f1b0 broke netbsd's thread notifier
Diffstat (limited to 'generic')
-rw-r--r-- | generic/tclInt.h | 3 | ||||
-rw-r--r-- | generic/tclThread.c | 39 |
2 files changed, 0 insertions, 42 deletions
diff --git a/generic/tclInt.h b/generic/tclInt.h index f39e77d..18574c3 100644 --- a/generic/tclInt.h +++ b/generic/tclInt.h @@ -2681,9 +2681,6 @@ MODULE_SCOPE void TclpInitUnlock(void); MODULE_SCOPE Tcl_Obj * TclpObjListVolumes(void); MODULE_SCOPE void TclpMasterLock(void); MODULE_SCOPE void TclpMasterUnlock(void); -MODULE_SCOPE void TclpMutexLock(void); -MODULE_SCOPE void TclpMutexUnlock(void); -MODULE_SCOPE void TclMutexUnlockAndFinalize(Tcl_Mutex *mutex); MODULE_SCOPE int TclpMatchFiles(Tcl_Interp *interp, char *separators, Tcl_DString *dirPtr, char *pattern, char *tail); MODULE_SCOPE int TclpObjNormalizePath(Tcl_Interp *interp, diff --git a/generic/tclThread.c b/generic/tclThread.c index 17071e5..d3cf4ba 100644 --- a/generic/tclThread.c +++ b/generic/tclThread.c @@ -283,45 +283,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) -{ -#ifdef TCL_THREADS - Tcl_Mutex mutex; -#endif - 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. |