diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-10-17 20:18:43 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-10-17 20:18:43 (GMT) |
| commit | d9174b0f8d27e0972f47612a3200003ecbd9aa90 (patch) | |
| tree | 6441fab2a0c15a2720ee25b96a7ad7eedc7bef91 /tests/chanio.test | |
| parent | e50b4e4c5965bae47fc77840198c415d83302b44 (diff) | |
| parent | a76f86e56510b6a36c85f5c22968aed705a26470 (diff) | |
| download | tcl-d9174b0f8d27e0972f47612a3200003ecbd9aa90.zip tcl-d9174b0f8d27e0972f47612a3200003ecbd9aa90.tar.gz tcl-d9174b0f8d27e0972f47612a3200003ecbd9aa90.tar.bz2 | |
Merge 9.0. More strict -eofchar parsing
Diffstat (limited to 'tests/chanio.test')
| -rw-r--r-- | tests/chanio.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/chanio.test b/tests/chanio.test index 2c1548d..c7cde60 100644 --- a/tests/chanio.test +++ b/tests/chanio.test @@ -5288,7 +5288,7 @@ test chan-io-39.22 {Tcl_SetChannelOption, invariance} -setup { } -constraints {unix} -body { set f1 [open $path(test1) w+] lappend l [chan configure $f1 -eofchar] - chan configure $f1 -eofchar {ON {}} + chan configure $f1 -eofchar {O {}} lappend l [chan configure $f1 -eofchar] chan configure $f1 -eofchar D lappend l [chan configure $f1 -eofchar] @@ -5300,7 +5300,7 @@ test chan-io-39.22a {Tcl_SetChannelOption, invariance} -setup { set l [list] } -body { set f1 [open $path(test1) w+] - chan configure $f1 -eofchar {ON {}} + chan configure $f1 -eofchar {O {}} lappend l [chan configure $f1 -eofchar] chan configure $f1 -eofchar D lappend l [chan configure $f1 -eofchar] |