diff options
| author | ferrieux <ferrieux@users.sourceforge.net> | 2011-08-19 15:24:32 (GMT) |
|---|---|---|
| committer | ferrieux <ferrieux@users.sourceforge.net> | 2011-08-19 15:24:32 (GMT) |
| commit | bddde2bfc901c841ab29bb1a2ed66008308d73f6 (patch) | |
| tree | 8ceaa7eb8fa1c81e5ad63677135736c726abbdf1 /tests/async.test | |
| parent | aa214c93b24de0fee5eb1e839e5c96f9dc40af3a (diff) | |
| download | tcl-bddde2bfc901c841ab29bb1a2ed66008308d73f6.zip tcl-bddde2bfc901c841ab29bb1a2ed66008308d73f6.tar.gz tcl-bddde2bfc901c841ab29bb1a2ed66008308d73f6.tar.bz2 | |
[Bug 1774689] async-4.3 sometimes fails. (backport)
Diffstat (limited to 'tests/async.test')
| -rw-r--r-- | tests/async.test | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/async.test b/tests/async.test index f89413f..b369839 100644 --- a/tests/async.test +++ b/tests/async.test @@ -175,7 +175,7 @@ proc hang3 {handle} [concat { set aresult {Async event not delivered} testasync marklater $handle set i 0 -} [string repeat {;incr i;} 1500000] { +} "[string repeat {;incr i;} 1500000]after 10;" { return $aresult }] |