diff options
author | sebres <sebres@users.sourceforge.net> | 2017-07-03 13:24:04 (GMT) |
---|---|---|
committer | sebres <sebres@users.sourceforge.net> | 2017-07-03 13:24:04 (GMT) |
commit | 8a1d9a3be57af976d24c218db14975378927f125 (patch) | |
tree | f5ba35170e5f2a3ee16e5b126a174c35b114ac52 /generic/tclInt.h | |
parent | df949554f991f8fb4a399bdd248437012deebe40 (diff) | |
download | tcl-8a1d9a3be57af976d24c218db14975378927f125.zip tcl-8a1d9a3be57af976d24c218db14975378927f125.tar.gz tcl-8a1d9a3be57af976d24c218db14975378927f125.tar.bz2 |
[performance] much better handling for timer events within Tcl_ServiceEvent using timer marker in the queue and direct call of TclServiceTimerEvents if marker reached (instead of continuous adding handler event, polling it in the queue and removing hereafter);
this provides double performance increase in the service cycle;
Diffstat (limited to 'generic/tclInt.h')
-rw-r--r-- | generic/tclInt.h | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/generic/tclInt.h b/generic/tclInt.h index 4151f83..d0d1240 100644 --- a/generic/tclInt.h +++ b/generic/tclInt.h @@ -2933,7 +2933,6 @@ MODULE_SCOPE TimerEntry* TclCreateTimerEntryEx( Tcl_TimerProc *proc, Tcl_TimerDeleteProc *deleteProc, size_t extraDataSize, int flags); MODULE_SCOPE void TclDeleteTimerEntry(TimerEntry *entryPtr); -MODULE_SCOPE int TclPeekEventQueued(int flags); MODULE_SCOPE int TclDefaultBgErrorHandlerObjCmd( ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); |