diff options
| author | dgp <dgp@users.sourceforge.net> | 2023-11-17 16:27:32 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2023-11-17 16:27:32 (GMT) |
| commit | fea641068270d01450771af89f5d73822435039c (patch) | |
| tree | 84e1a7ba74453aaa7af15a86bbba77110c269fb1 | |
| parent | fbabecc404d0d5f301b50f302dadfb669b7afec0 (diff) | |
| parent | 64b0714cce3dbecaa78cd113cdf1dfe4da5d1ef5 (diff) | |
| download | tcl-fea641068270d01450771af89f5d73822435039c.zip tcl-fea641068270d01450771af89f5d73822435039c.tar.gz tcl-fea641068270d01450771af89f5d73822435039c.tar.bz2 | |
merge 8.7
| -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 |