summaryrefslogtreecommitdiffstats
path: root/tests/tcltest.test
diff options
context:
space:
mode:
authorpspjuth <peter.spjuth@gmail.com>2018-10-22 21:15:00 (GMT)
committerpspjuth <peter.spjuth@gmail.com>2018-10-22 21:15:00 (GMT)
commit394e22ef5d4e279dbb1e8d2d6616c84e70f5032f (patch)
treef19213e6131770eefbadb228e8ccf4761f82556f /tests/tcltest.test
parent5b1614f31a3c2c510c726089b6ca499cfb792e72 (diff)
downloadtcl-394e22ef5d4e279dbb1e8d2d6616c84e70f5032f.zip
tcl-394e22ef5d4e279dbb1e8d2d6616c84e70f5032f.tar.gz
tcl-394e22ef5d4e279dbb1e8d2d6616c84e70f5032f.tar.bz2
Updated tests to exercise new feature.
Diffstat (limited to 'tests/tcltest.test')
-rw-r--r--tests/tcltest.test6
1 files changed, 3 insertions, 3 deletions
diff --git a/tests/tcltest.test b/tests/tcltest.test
index 1487865..ca720ee 100644
--- a/tests/tcltest.test
+++ b/tests/tcltest.test
@@ -1207,7 +1207,7 @@ test tcltest-21.2 {force a test command failure} {
} {1}
}
-returnCodes 1
- -result {bad option "1": must be -body, -cleanup, -constraints, -errorOutput, -match, -output, -result, -returnCodes, or -setup}
+ -result {bad option "1": must be -body, -cleanup, -constraints, -errorCode, -errorOutput, -match, -output, -result, -returnCodes, or -setup}
}
test tcltest-21.3 {test command with setup} {
@@ -1300,7 +1300,7 @@ test tcltest-21.7 {test command - bad flag} {
}
}
-returnCodes 1
- -result {bad option "-foobar": must be -body, -cleanup, -constraints, -errorOutput, -match, -output, -result, -returnCodes, or -setup}
+ -result {bad option "-foobar": must be -body, -cleanup, -constraints, -errorCode, -errorOutput, -match, -output, -result, -returnCodes, or -setup}
}
# alternate test command format (these are the same as 21.1-21.6, with the
@@ -1320,7 +1320,7 @@ test tcltest-21.8 {force a test command failure} \
} \
-returnCodes 1 \
-cleanup {set ::tcltest::currentFailure $fail} \
- -result {bad option "1": must be -body, -cleanup, -constraints, -errorOutput, -match, -output, -result, -returnCodes, or -setup}
+ -result {bad option "1": must be -body, -cleanup, -constraints, -errorCode, -errorOutput, -match, -output, -result, -returnCodes, or -setup}
test tcltest-21.9 {test command with setup} \
-setup {set foo 1} \