diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2012-05-25 08:50:37 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2012-05-25 08:50:37 (GMT) |
| commit | 423017faed3aa258b3fa9c04cf9c6f5289d355a8 (patch) | |
| tree | f84e7b63a363eae47b283df8cd05e218145957f2 /generic/tclIO.c | |
| parent | 8e1594e0c28687570a86fab6225c08157952fe7f (diff) | |
| download | tcl-423017faed3aa258b3fa9c04cf9c6f5289d355a8.zip tcl-423017faed3aa258b3fa9c04cf9c6f5289d355a8.tar.gz tcl-423017faed3aa258b3fa9c04cf9c6f5289d355a8.tar.bz2 | |
Factor out constant that must be the same in multiple places. Prompted by a
conversation with Alexandre Ferrieux.
Diffstat (limited to 'generic/tclIO.c')
| -rw-r--r-- | generic/tclIO.c | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/generic/tclIO.c b/generic/tclIO.c index 9e729c4..a76aba3 100644 --- a/generic/tclIO.c +++ b/generic/tclIO.c @@ -8419,8 +8419,8 @@ UpdateInterest( mask &= ~TCL_EXCEPTION; if (!statePtr->timer) { - statePtr->timer = Tcl_CreateTimerHandler(0, ChannelTimerProc, - chanPtr); + statePtr->timer = Tcl_CreateTimerHandler(SYNTHETIC_EVENT_TIME, + ChannelTimerProc, chanPtr); } } } @@ -8461,7 +8461,8 @@ ChannelTimerProc( * before UpdateInterest gets called by Tcl_NotifyChannel. */ - statePtr->timer = Tcl_CreateTimerHandler(0, ChannelTimerProc,chanPtr); + statePtr->timer = Tcl_CreateTimerHandler(SYNTHETIC_EVENT_TIME, + ChannelTimerProc,chanPtr); #ifdef TCL_IO_TRACK_OS_FOR_DRIVER_WITH_BAD_BLOCKING /* |