diff options
author | nijtmans <nijtmans@noemail.net> | 2008-07-24 21:54:38 (GMT) |
---|---|---|
committer | nijtmans <nijtmans@noemail.net> | 2008-07-24 21:54:38 (GMT) |
commit | 99c1f1dc71cec3e87f27d8ed4f2c918e7eef98e2 (patch) | |
tree | d6af35eba3a72d32359fa5a28abd6fe83823567d /generic/tclThread.c | |
parent | 637c580f8f148d94744a67ee520647bc5b180866 (diff) | |
download | tcl-99c1f1dc71cec3e87f27d8ed4f2c918e7eef98e2.zip tcl-99c1f1dc71cec3e87f27d8ed4f2c918e7eef98e2.tar.gz tcl-99c1f1dc71cec3e87f27d8ed4f2c918e7eef98e2.tar.bz2 |
CONSTified 4 functions in the Notifier which all have a Tcl_Time* in it which is
supposed to be a constant, but this was not reflected in the API:
Tcl_SetTimer
Tcl_WaitForEvent
Tcl_ConditionWait
Tcl_SetMaxBlockTime
Introduced a CONST86, so extensions which have their own Notifier
(are there any?) can be modified to compile against both Tcl 8.5
and Tcl 8.6. This change complies with TIP #24
FossilOrigin-Name: 7ade6e690e5d9da6d707b6796e656ef6df6565e3
Diffstat (limited to 'generic/tclThread.c')
-rw-r--r-- | generic/tclThread.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/generic/tclThread.c b/generic/tclThread.c index 1a544e3..0feba5b 100644 --- a/generic/tclThread.c +++ b/generic/tclThread.c @@ -10,7 +10,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclThread.c,v 1.20 2008/05/09 04:58:54 georgeps Exp $ + * RCS: @(#) $Id: tclThread.c,v 1.21 2008/07/24 21:54:39 nijtmans Exp $ */ #include "tclInt.h" @@ -125,7 +125,7 @@ Tcl_GetThreadData( void * TclThreadDataKeyGet( Tcl_ThreadDataKey *keyPtr) /* Identifier for the data chunk. */ - + { #ifdef TCL_THREADS return TclThreadStorageKeyGet(keyPtr); @@ -405,7 +405,7 @@ TclFinalizeSynchronization(void) } keyRecord.max = 0; keyRecord.num = 0; - + #ifdef TCL_THREADS /* * Call thread storage master cleanup. @@ -496,7 +496,7 @@ void Tcl_ConditionWait( Tcl_Condition *condPtr, /* Really (pthread_cond_t **) */ Tcl_Mutex *mutexPtr, /* Really (pthread_mutex_t **) */ - Tcl_Time *timePtr) /* Timeout on waiting period */ + const Tcl_Time *timePtr) /* Timeout on waiting period */ { } |