From 8a2ea780c61e56cc4a7e757c880df05992930c5a Mon Sep 17 00:00:00 2001 From: dkf Date: Tue, 19 Dec 2006 16:14:40 +0000 Subject: Fix [Bug 1618838] --- ChangeLog | 5 +++++ unix/tclUnixThrd.c | 7 +++++-- 2 files changed, 10 insertions(+), 2 deletions(-) diff --git a/ChangeLog b/ChangeLog index cde9128..b7496e6 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,8 @@ +2006-12-19 Donal K. Fellows + + * unix/tclUnixThrd.c (Tcl_GetAllocMutex, TclpNewAllocMutex): Add + intermediate variables to shut up unwanted warnings. [Bug 1618838] + 2006-12-19 Daniel Steffen * unix/tclUnixThrd.c (TclpInetNtoa): fix for 64 bit. diff --git a/unix/tclUnixThrd.c b/unix/tclUnixThrd.c index 8fc8c63..8a48c50 100644 --- a/unix/tclUnixThrd.c +++ b/unix/tclUnixThrd.c @@ -440,7 +440,8 @@ Tcl_Mutex * Tcl_GetAllocMutex(void) { #ifdef TCL_THREADS - return (Tcl_Mutex *)&allocLockPtr; + pthread_mutex_t **allocLockPtrPtr = &allocLockPtr; + return (Tcl_Mutex *) allocLockPtrPtr; #else return NULL; #endif @@ -742,12 +743,14 @@ Tcl_Mutex * TclpNewAllocMutex(void) { struct allocMutex *lockPtr; + register pthread_mutex_t *plockPtr; lockPtr = malloc(sizeof(struct allocMutex)); if (lockPtr == NULL) { Tcl_Panic("could not allocate lock"); } - lockPtr->tlock = (Tcl_Mutex) &lockPtr->plock; + plockPtr = &lockPtr->plock; + lockPtr->tlock = (Tcl_Mutex) plockPtr; pthread_mutex_init(&lockPtr->plock, NULL); return &lockPtr->tlock; } -- cgit v0.12