diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-03-10 11:56:23 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-03-10 11:56:23 (GMT) |
commit | 13347d984e68e94063bee8fe1b5c8cc77ef5b250 (patch) | |
tree | 556090915c1e4fb7420fa462964788c31d0852d9 /tests/coroutine.test | |
parent | 5137357e74c887368ad68c3cb09998b154e68d4f (diff) | |
download | tcl-13347d984e68e94063bee8fe1b5c8cc77ef5b250.zip tcl-13347d984e68e94063bee8fe1b5c8cc77ef5b250.tar.gz tcl-13347d984e68e94063bee8fe1b5c8cc77ef5b250.tar.bz2 |
Eliminate exess spacings in many test-cases
Diffstat (limited to 'tests/coroutine.test')
-rw-r--r-- | tests/coroutine.test | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/tests/coroutine.test b/tests/coroutine.test index 205da67..86fa6e3 100644 --- a/tests/coroutine.test +++ b/tests/coroutine.test @@ -66,7 +66,7 @@ test coroutine-1.3 {yield returns new arg} -setup { incr i } } - coroutine foo ::apply [list {{start 2} {stop 10}} $body] + coroutine foo ::apply [list {{start 2} {stop 10}} $body] set res {} } -body { for {set k 1} {$k < 4} {incr k} { @@ -476,7 +476,7 @@ test coroutine-5.1 {right numLevels on coro return} -constraints {testnrelevels} expr {[lindex [testnrelevels] 1] - 1} } proc relativeLevel base { - # remove the level for this proc's call + # remove the level for this proc's call expr {[getNumLevel] - $base - 1} } proc foo {} { @@ -517,7 +517,7 @@ test coroutine-5.2 {right numLevels within coro} -constraints {testnrelevels} \ expr {[lindex [testnrelevels] 1] - 1} } proc relativeLevel base { - # remove the level for this proc's call + # remove the level for this proc's call expr {[getNumLevel] - $base - 1} } proc foo base { @@ -588,7 +588,7 @@ test coroutine-7.2 {multi-argument yielding with yieldto} -body { coroutine a corobody coroutine b corobody list [a x] [a y z] [a \{p] [a \{q r] [a] [a] [rename a {}] \ - [b ok] [rename b {}] + [b ok] [rename b {}] } -cleanup { rename corobody {} } -result {x {y z 2} \{p {\{q r 2} {} 0 {} ok {}} |