diff options
| -rw-r--r-- | tests/event.test | 2 | ||||
| -rw-r--r-- | tests/timer.test | 4 |
2 files changed, 3 insertions, 3 deletions
diff --git a/tests/event.test b/tests/event.test index 207c799..67a980b 100644 --- a/tests/event.test +++ b/tests/event.test @@ -527,7 +527,7 @@ test event-11.4 {Tcl_VwaitCmd procedure} -setup { } -body { after 100 {set x x-done} after 200 {set y y-done} - after 300 {set z z-done} + after 400 {set z z-done} after idle {set q q-done} set x before set y before diff --git a/tests/timer.test b/tests/timer.test index ab6efc9..740d05e 100644 --- a/tests/timer.test +++ b/tests/timer.test @@ -205,11 +205,11 @@ test timer-6.4 {Tcl_AfterCmd procedure, ms argument} { } {before after} test timer-6.5 {Tcl_AfterCmd procedure, ms argument} { set x before - after 300 set x after + after 400 set x after after 200 update set y $x - after 200 + after 400 update list $y $x } {before after} |