diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2014-07-12 16:13:27 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2014-07-12 16:13:27 (GMT) |
| commit | 7bea42569d8c2ccb8584155f706392d5812ec428 (patch) | |
| tree | 4f61b95593d24393fff08344b408215836a58a05 /tests/ioTrans.test | |
| parent | f0bba60202785e634e8e1712db5cc37246d36e32 (diff) | |
| download | tcl-7bea42569d8c2ccb8584155f706392d5812ec428.zip tcl-7bea42569d8c2ccb8584155f706392d5812ec428.tar.gz tcl-7bea42569d8c2ccb8584155f706392d5812ec428.tar.bz2 | |
whopper change; now passes test suite on OSX
Diffstat (limited to 'tests/ioTrans.test')
| -rw-r--r-- | tests/ioTrans.test | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/tests/ioTrans.test b/tests/ioTrans.test index c40621b..05d0d33 100644 --- a/tests/ioTrans.test +++ b/tests/ioTrans.test @@ -111,7 +111,7 @@ test iortrans-1.0 {chan, wrong#args} -returnCodes error -body { } -result {wrong # args: should be "chan subcommand ?arg ...?"} test iortrans-1.1 {chan, unknown method} -returnCodes error -body { chan foo -} -match glob -result {unknown or ambiguous subcommand "foo": must be*} +} -match glob -result {unknown or ambiguous subcommand "foo": should be*} # --- --- --- --------- --------- --------- # chan push, and method "initalize" @@ -181,14 +181,14 @@ test iortrans-2.10 {chan push, initialize failed, bad result, bogus method name} } -returnCodes error -cleanup { tempdone rename foo {} -} -match glob -result {*bad method "1": must be *} +} -match glob -result {*bad method "1": should be *} test iortrans-2.11 {chan push, initialize failed, bad result, bogus method name} -body { proc foo {args} {return {a b c}} chan push [tempchan] foo } -returnCodes error -cleanup { tempdone rename foo {} -} -match glob -result {*bad method "c": must be *} +} -match glob -result {*bad method "c": should be *} test iortrans-2.12 {chan push, initialize failed, bad result, required methods missing} -body { # Required: initialize, and finalize. proc foo {args} {return {initialize}} @@ -203,7 +203,7 @@ test iortrans-2.13 {chan push, initialize failed, bad result, illegal method nam } -returnCodes error -cleanup { tempdone rename foo {} -} -match glob -result {*returned bad method "BOGUS": must be clear, drain, finalize, flush, initialize, limit?, read, or write} +} -match glob -result {*returned bad method "BOGUS": should be clear, drain, finalize, flush, initialize, limit?, read, or write} test iortrans-2.14 {chan push, initialize failed, bad result, mode/handler mismatch} -body { proc foo {args} {return {initialize finalize}} chan push [tempchan] foo |