diff options
Diffstat (limited to 'generic/tclThreadJoin.c')
| -rw-r--r-- | generic/tclThreadJoin.c | 18 |
1 files changed, 8 insertions, 10 deletions
diff --git a/generic/tclThreadJoin.c b/generic/tclThreadJoin.c index af4bc13..3a905b5 100644 --- a/generic/tclThreadJoin.c +++ b/generic/tclThreadJoin.c @@ -6,7 +6,7 @@ * provide the functionality of joining threads. This code is currently * not necessary on Unix. * - * Copyright © 2000 Scriptics Corporation + * Copyright (c) 2000 by Scriptics Corporation * * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. @@ -14,7 +14,7 @@ #include "tclInt.h" -#ifdef _WIN32 +#ifdef WIN32 /* * The information about each joinable thread is remembered in a structure as @@ -52,7 +52,7 @@ typedef struct JoinableThread { TCL_DECLARE_MUTEX(joinMutex) -static JoinableThread *firstThreadPtr; +static JoinableThread* firstThreadPtr; /* *---------------------------------------------------------------------- @@ -201,7 +201,7 @@ TclJoinThread( Tcl_ConditionFinalize(&threadPtr->cond); Tcl_MutexFinalize(&threadPtr->threadMutex); - ckfree(threadPtr); + ckfree((char *) threadPtr); return TCL_OK; } @@ -211,8 +211,8 @@ TclJoinThread( * * TclRememberJoinableThread -- * - * This procedure remembers a thread as joinable. Only a call to - * TclJoinThread will remove the structure created (and initialized) here. + * This procedure remebers a thread as joinable. Only a call to + * TclJoinThread will remove the structre created (and initialized) here. * IOW, not waiting upon a joinable thread will cause memory leaks. * * Results: @@ -230,7 +230,7 @@ TclRememberJoinableThread( { JoinableThread *threadPtr; - threadPtr = (JoinableThread *)ckalloc(sizeof(JoinableThread)); + threadPtr = (JoinableThread *) ckalloc(sizeof(JoinableThread)); threadPtr->id = id; threadPtr->done = 0; threadPtr->waitedUpon = 0; @@ -305,9 +305,7 @@ TclSignalExitThread( Tcl_MutexUnlock(&threadPtr->threadMutex); } -#else -TCL_MAC_EMPTY_FILE(generic_tclThreadJoin_c) -#endif /* _WIN32 */ +#endif /* WIN32 */ /* * Local Variables: |