diff options
author | dgp <dgp@users.sourceforge.net> | 2018-01-29 13:18:39 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2018-01-29 13:18:39 (GMT) |
commit | 4f918b61b0cdd470824ce7a6198b89e8b6b90ca0 (patch) | |
tree | 0ccec66e782c119a5d30ba536683f91cfabeaaa9 /tests/chanio.test | |
parent | 68214211b7b63be8a757a494bacc588c4880deb3 (diff) | |
parent | 876f2d5b633933c4d5a652a0bc4e1742893cc458 (diff) | |
download | tcl-4f918b61b0cdd470824ce7a6198b89e8b6b90ca0.zip tcl-4f918b61b0cdd470824ce7a6198b89e8b6b90ca0.tar.gz tcl-4f918b61b0cdd470824ce7a6198b89e8b6b90ca0.tar.bz2 |
merge 8.7
Diffstat (limited to 'tests/chanio.test')
-rw-r--r-- | tests/chanio.test | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/tests/chanio.test b/tests/chanio.test index 2d900d0..97e7e70 100644 --- a/tests/chanio.test +++ b/tests/chanio.test @@ -5866,6 +5866,8 @@ test chan-io-47.6 {file events on shared files, deleting file events} -setup { testfevent delete chan close $f } -result {{script 1} {}} +unset path(foo) +removeFile foo set path(bar) [makeFile {} bar] @@ -5961,6 +5963,9 @@ test chan-io-48.3 {testing readability conditions} -setup { } -cleanup { chan close $f } -result {done {0 1 0 1 0 1 0 1 0 1 0 1 0 0}} +unset path(bar) +removeFile bar + test chan-io-48.4 {lf write, testing readability, ^Z termination, auto read mode} -setup { file delete $path(test1) set c 0 @@ -6790,8 +6795,6 @@ test chan-io-52.11 {TclCopyChannel & encodings} -setup { chan close $in chan close $out file size $path(kyrillic.txt) -} -cleanup { - file delete $path(utf8-fcopy.txt) } -result 3 test chan-io-53.1 {CopyData} -setup { |