diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-11-20 08:41:55 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-11-20 08:41:55 (GMT) |
commit | 3c79d696f0a9c010151d498ab2e18a83d49589e3 (patch) | |
tree | cf86afbb879566ba44f469416712dbca376338a3 /tests/ioCmd.test | |
parent | f3fb557c118759ada47f0b60a97ceb99dd0c7100 (diff) | |
parent | 62f60cd6881ad2b5ed307d57d9111e27300e90d6 (diff) | |
download | tcl-core-tip-661-candidate.zip tcl-core-tip-661-candidate.tar.gz tcl-core-tip-661-candidate.tar.bz2 |
Merge 9.0core-tip-661-candidate
Diffstat (limited to 'tests/ioCmd.test')
-rw-r--r-- | tests/ioCmd.test | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/tests/ioCmd.test b/tests/ioCmd.test index 6823a26..94129a2 100644 --- a/tests/ioCmd.test +++ b/tests/ioCmd.test @@ -3985,7 +3985,7 @@ test iocmd.writeFile-2.1 "readFile procedure: behaviour" -setup { return $text }} $f] } -cleanup { - removeFile $f + file delete $f } -result [list {} "File\nContents\n"] test iocmd.writeFile-2.2 "readFile procedure: behaviour" -setup { set f [makeFile "" writeFile22.txt] @@ -3999,7 +3999,7 @@ test iocmd.writeFile-2.2 "readFile procedure: behaviour" -setup { return $text }} $f } -cleanup { - removeFile $f + file delete $f } -result "File\nContents\n" test iocmd.writeFile-2.3 "readFile procedure: behaviour" -setup { set f [makeFile "" writeFile23.txt] @@ -4014,7 +4014,7 @@ test iocmd.writeFile-2.3 "readFile procedure: behaviour" -setup { return $x }} $f } -cleanup { - removeFile $f + file delete $f } -result {0 1 2 3 4 26 27 13 10 0} # Tests of foreachLine |