summaryrefslogtreecommitdiffstats
path: root/tests/async.test
diff options
context:
space:
mode:
authorferrieux <ferrieux@users.sourceforge.net>2011-08-19 15:24:32 (GMT)
committerferrieux <ferrieux@users.sourceforge.net>2011-08-19 15:24:32 (GMT)
commitbddde2bfc901c841ab29bb1a2ed66008308d73f6 (patch)
tree8ceaa7eb8fa1c81e5ad63677135736c726abbdf1 /tests/async.test
parentaa214c93b24de0fee5eb1e839e5c96f9dc40af3a (diff)
downloadtcl-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.test2
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
}]