summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorwelch <welch@noemail.net>1999-08-10 17:17:27 (GMT)
committerwelch <welch@noemail.net>1999-08-10 17:17:27 (GMT)
commitc498ce424205023240debef2488295b5916e61d3 (patch)
tree7fcb9d46657d529dd86dea55ccfde3d49e9a5ce3
parentc9d9e9baf37623e138f43d08e394235c12fe41a0 (diff)
downloadtcl-c498ce424205023240debef2488295b5916e61d3.zip
tcl-c498ce424205023240debef2488295b5916e61d3.tar.gz
tcl-c498ce424205023240debef2488295b5916e61d3.tar.bz2
Fixed level of indirection in Tcl_GetAllocMutex
FossilOrigin-Name: 493612de836ab32db1adeea0f63330b3f5eafe7e
-rw-r--r--unix/tclUnixThrd.c3
1 files changed, 2 insertions, 1 deletions
diff --git a/unix/tclUnixThrd.c b/unix/tclUnixThrd.c
index a9127a7..47e56d7 100644
--- a/unix/tclUnixThrd.c
+++ b/unix/tclUnixThrd.c
@@ -41,6 +41,7 @@ static pthread_mutex_t initLock = PTHREAD_MUTEX_INITIALIZER;
*/
static pthread_mutex_t allocLock = PTHREAD_MUTEX_INITIALIZER;
+static pthread_mutex_t *allocLockPtr = &allocLock;
/*
* These are for the critical sections inside this file.
@@ -279,7 +280,7 @@ Tcl_Mutex *
Tcl_GetAllocMutex()
{
#ifdef TCL_THREADS
- return (Tcl_Mutex *)&allocLock;
+ return (Tcl_Mutex *)&allocLockPtr;
#else
return NULL;
#endif