diff options
| author | dgp <dgp@users.sourceforge.net> | 2008-06-20 16:49:09 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2008-06-20 16:49:09 (GMT) |
| commit | 0cc32b6dffd4788b282213175da265ad8d8edd2b (patch) | |
| tree | 53a8e17f8bc4ddf150545db5ca7598965a6bb92e /tests/io.test | |
| parent | e7043db7ef76cb0f0ff1cad93f68788000644560 (diff) | |
| download | tcl-0cc32b6dffd4788b282213175da265ad8d8edd2b.zip tcl-0cc32b6dffd4788b282213175da265ad8d8edd2b.tar.gz tcl-0cc32b6dffd4788b282213175da265ad8d8edd2b.tar.bz2 | |
* tests/binary.test: Corrected flawed tests revealed by a -debug 1
* tests/io.test: -singleproc 1 test suite run.
Diffstat (limited to 'tests/io.test')
| -rw-r--r-- | tests/io.test | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/tests/io.test b/tests/io.test index 2627140..1a0f72e 100644 --- a/tests/io.test +++ b/tests/io.test @@ -13,7 +13,7 @@ # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. # -# RCS: @(#) $Id: io.test,v 1.40.2.22 2008/05/26 18:26:15 hobbs Exp $ +# RCS: @(#) $Id: io.test,v 1.40.2.23 2008/06/20 16:49:11 dgp Exp $ if {[catch {package require tcltest 2}]} { puts stderr "Skipping tests in [info script]. tcltest 2 required." @@ -7461,8 +7461,8 @@ test io-61.1 {Reset eof state after changing the eof char} -setup { } -result {77 = 23431} # cleanup -foreach file [list fooBar longfile script output test1 pipe my_script foo \ - bar test2 test3 cat stdout kyrillic.txt utf8-fcopy.txt utf8-rp.txt] { +foreach file [list fooBar longfile script output test1 pipe my_script \ + test2 test3 cat stdout kyrillic.txt utf8-fcopy.txt utf8-rp.txt] { removeFile $file } cleanupTests |