diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-06-26 12:02:46 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-06-26 12:02:46 (GMT) |
commit | f3f4b0ac240dc7dd39484e5a97ffe598d7f3bec2 (patch) | |
tree | 8894dfc5580fa395643e4377b0e744a75edc6df0 /tests/ioCmd.test | |
parent | 623d105a75f5fef7459508c6341172547aed95c9 (diff) | |
parent | b0b78fdf11aa9d477ae420565edb6a9b0dbeb82d (diff) | |
download | tcl-f3f4b0ac240dc7dd39484e5a97ffe598d7f3bec2.zip tcl-f3f4b0ac240dc7dd39484e5a97ffe598d7f3bec2.tar.gz tcl-f3f4b0ac240dc7dd39484e5a97ffe598d7f3bec2.tar.bz2 |
Remove empty "fconfigure" commands in testcases. Some indenting in *.decls files
Diffstat (limited to 'tests/ioCmd.test')
-rw-r--r-- | tests/ioCmd.test | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/tests/ioCmd.test b/tests/ioCmd.test index ef7403e..e0e3bc2 100644 --- a/tests/ioCmd.test +++ b/tests/ioCmd.test @@ -446,17 +446,14 @@ test iocmd-12.3 {POSIX open access modes: WRONLY} -match regexp -body { test iocmd-12.4 {POSIX open access modes: WRONLY} {unix} { file delete $path(test3) set f [open $path(test3) w] - fconfigure $f puts $f xyzzy close $f set f [open $path(test3) WRONLY] - fconfigure $f puts -nonewline $f "ab" seek $f 0 current set x [list [catch {gets $f} msg] $msg] close $f set f [open $path(test3) r] - fconfigure $f lappend x [gets $f] close $f set y [list 1 [format "channel \"%s\" wasn't opened for reading" $f] abzzy] |