diff options
author | sebres <sebres@users.sourceforge.net> | 2017-07-03 13:29:07 (GMT) |
---|---|---|
committer | sebres <sebres@users.sourceforge.net> | 2017-07-03 13:29:07 (GMT) |
commit | f1d006af946ed800038bc2babde5d70ce347faab (patch) | |
tree | cfb31f3c682e23931c8d6b446207a4a1b124d23d /generic/tclTimer.c | |
parent | 418300bd6d16dcb6a02fad92ce471e69ce17fc7d (diff) | |
download | tcl-f1d006af946ed800038bc2babde5d70ce347faab.zip tcl-f1d006af946ed800038bc2babde5d70ce347faab.tar.gz tcl-f1d006af946ed800038bc2babde5d70ce347faab.tar.bz2 |
interim commit: try to fix time-drift backwards (calibration? something else?)...
Diffstat (limited to 'generic/tclTimer.c')
-rw-r--r-- | generic/tclTimer.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclTimer.c b/generic/tclTimer.c index d9e25de..a7fd50b 100644 --- a/generic/tclTimer.c +++ b/generic/tclTimer.c @@ -1427,7 +1427,7 @@ AfterDelay( || TCL_TIME_BEFORE(endTime, iPtr->limit.time)) { diff = TCL_TIME_DIFF_MS(endTime, now); if (TCL_TIME_DIFF_US(endTime, now) > 500 || TCL_TIME_DIFF_US(endTime, now) < -500) { - printf("!!!!!!!!!!!!!!!!!!!!!!!!!!!drift!!!! %5.3f, diff: %d -- %d.%06d - %d.%06d (%d usec)\n", ms, (int)diff, endTime.sec, endTime.usec, now.sec, now.usec, TCL_TIME_DIFF_US(endTime, now)); + //printf("!!!!!!!!!!!!!!!!!!!!!!!!!!!drift!!!! %5.3f, diff: %d -- %d.%06d - %d.%06d (%d usec)\n", ms, (int)diff, endTime.sec, endTime.usec, now.sec, now.usec, TCL_TIME_DIFF_US(endTime, now)); } #ifndef TCL_WIDE_INT_IS_LONG if (diff > LONG_MAX) { |