diff options
| author | ferrieux <ferrieux@users.sourceforge.net> | 2012-04-30 09:15:34 (GMT) |
|---|---|---|
| committer | ferrieux <ferrieux@users.sourceforge.net> | 2012-04-30 09:15:34 (GMT) |
| commit | 4fe66ccda0979071b4d247a7e1bfb7d8425afd65 (patch) | |
| tree | 7e0e95ff7c77e813dc152ca2485d720d1c691261 | |
| parent | 4afd3525b5e7ea01272b07281dd65833bdb885d7 (diff) | |
| download | tcl-4fe66ccda0979071b4d247a7e1bfb7d8425afd65.zip tcl-4fe66ccda0979071b4d247a7e1bfb7d8425afd65.tar.gz tcl-4fe66ccda0979071b4d247a7e1bfb7d8425afd65.tar.bz2 | |
Mention compatibility matters in Changelog. Make test insensitive to ambient compat flag.
| -rw-r--r-- | ChangeLog | 4 | ||||
| -rw-r--r-- | tests/io.test | 1 |
2 files changed, 3 insertions, 2 deletions
@@ -3,8 +3,8 @@ IMPLEMENTATION OF TIP#398 * generic/tclIO.c: Quickly Exit with Non-Blocking Blocked Channels - * tests/io.test - * doc/close.n + * tests/io.test : *** POTENTIAL INCOMPATIBILITY *** + * doc/close.n : (compat flag available) 2012-04-27 Jan Nijtmans <nijtmans@users.sf.net> diff --git a/tests/io.test b/tests/io.test index 74a246c..e6cea16 100644 --- a/tests/io.test +++ b/tests/io.test @@ -2750,6 +2750,7 @@ test io-29.33b {TIP#398, no implicit flush of nonblocking on exit} {exec} { close $f set t1 [clock seconds] set ff [open "|[list [interpreter] $path(script2)]" w] + catch {unset ::env(TCL_FLUSH_NONBLOCKING_ON_EXIT)} exec [interpreter] $path(script) >@ $ff set t2 [clock seconds] close $ff |