diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-03-25 23:30:52 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-03-25 23:30:52 (GMT) |
| commit | daddc48750eecd5bf30eedbcc89366679e24416e (patch) | |
| tree | 4616487836c6483d23020343aca8927607018199 | |
| parent | d7b2522f64fd46754b3d322db0eab3794a55672c (diff) | |
| download | tk-daddc48750eecd5bf30eedbcc89366679e24416e.zip tk-daddc48750eecd5bf30eedbcc89366679e24416e.tar.gz tk-daddc48750eecd5bf30eedbcc89366679e24416e.tar.bz2 | |
renumber testcases
| -rw-r--r-- | tests/cluster.test | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/tests/cluster.test b/tests/cluster.test index b4403bf..820d9ab 100644 --- a/tests/cluster.test +++ b/tests/cluster.test @@ -130,13 +130,13 @@ test cluster-6.0 {::tk::startOfCluster} -body { test cluster-6.1 {::tk::endOfCluster} -body { ::tk::endOfCluster a b c d } -returnCodes 1 -result {wrong # args: should be "::tk::endOfCluster str start ?locale?"} -test cluster-6.0 {::tk::startOfPreviousWord} -body { +test cluster-6.2 {::tk::startOfPreviousWord} -body { ::tk::startOfPreviousWord a b c d } -returnCodes 1 -result {wrong # args: should be "::tk::startOfPreviousWord str start ?locale?"} -test cluster-6.0 {::tk::startOfNextWord} -body { +test cluster-6.3 {::tk::startOfNextWord} -body { ::tk::startOfNextWord a b c d } -returnCodes 1 -result {wrong # args: should be "::tk::startOfNextWord str start ?locale?"} -test cluster-6.1 {::tk::endOfWord} -body { +test cluster-6.4 {::tk::endOfWord} -body { ::tk::endOfWord a b c d } -returnCodes 1 -result {wrong # args: should be "::tk::endOfWord str start ?locale?"} |