diff options
| author | nijtmans <nijtmans> | 2008-07-24 21:54:38 (GMT) |
|---|---|---|
| committer | nijtmans <nijtmans> | 2008-07-24 21:54:38 (GMT) |
| commit | 7f55ab2959b7ec3cac71c72171f20aed26c8f016 (patch) | |
| tree | d6af35eba3a72d32359fa5a28abd6fe83823567d /unix/tclUnixNotfy.c | |
| parent | 7b1a1c06d6d6cdf4035ef5b35802f85862b27088 (diff) | |
| download | tcl-7f55ab2959b7ec3cac71c72171f20aed26c8f016.zip tcl-7f55ab2959b7ec3cac71c72171f20aed26c8f016.tar.gz tcl-7f55ab2959b7ec3cac71c72171f20aed26c8f016.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
Diffstat (limited to 'unix/tclUnixNotfy.c')
| -rw-r--r-- | unix/tclUnixNotfy.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/unix/tclUnixNotfy.c b/unix/tclUnixNotfy.c index a763b1d..e285f03 100644 --- a/unix/tclUnixNotfy.c +++ b/unix/tclUnixNotfy.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: tclUnixNotfy.c,v 1.35 2008/04/16 14:29:26 das Exp $ + * RCS: @(#) $Id: tclUnixNotfy.c,v 1.36 2008/07/24 21:54:42 nijtmans Exp $ */ #include "tclInt.h" @@ -371,7 +371,7 @@ Tcl_AlertNotifier( void Tcl_SetTimer( - Tcl_Time *timePtr) /* Timeout value, may be NULL. */ + const Tcl_Time *timePtr) /* Timeout value, may be NULL. */ { if (tclNotifierHooks.setTimerProc) { tclNotifierHooks.setTimerProc(timePtr); @@ -669,7 +669,7 @@ FileHandlerEventProc( int Tcl_WaitForEvent( - Tcl_Time *timePtr) /* Maximum block time, or NULL. */ + const Tcl_Time *timePtr) /* Maximum block time, or NULL. */ { if (tclNotifierHooks.waitForEventProc) { return tclNotifierHooks.waitForEventProc(timePtr); |