diff options
author | pspjuth <peter.spjuth@gmail.com> | 2018-10-22 21:15:00 (GMT) |
---|---|---|
committer | pspjuth <peter.spjuth@gmail.com> | 2018-10-22 21:15:00 (GMT) |
commit | 394e22ef5d4e279dbb1e8d2d6616c84e70f5032f (patch) | |
tree | f19213e6131770eefbadb228e8ccf4761f82556f /tests/tcltest.test | |
parent | 5b1614f31a3c2c510c726089b6ca499cfb792e72 (diff) | |
download | tcl-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.test | 6 |
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} \ |