diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2011-08-22 10:18:06 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2011-08-22 10:18:06 (GMT) |
commit | f1f10fb2a5773e4577cbf58b62acff8d77eb4eef (patch) | |
tree | 69195bcfa188f4077eae88dda3f09bd1a67cd5f5 /tests | |
parent | 812a702c5b6a08312fc0eac684a86fcb5a651e35 (diff) | |
parent | 6b86c2f514ad7c263691443055ad1d0a94a9f4f9 (diff) | |
download | tcl-f1f10fb2a5773e4577cbf58b62acff8d77eb4eef.zip tcl-f1f10fb2a5773e4577cbf58b62acff8d77eb4eef.tar.gz tcl-f1f10fb2a5773e4577cbf58b62acff8d77eb4eef.tar.bz2 |
Merge to feature branch
Diffstat (limited to 'tests')
-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 db21333..7834ed5 100644 --- a/tests/async.test +++ b/tests/async.test @@ -196,7 +196,7 @@ test async-4.3 {async interrupting loop-less bytecode sequence} -constraints { 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 }]] $hm } -result {test pattern} -cleanup { |