diff options
| author | dgp <dgp@users.sourceforge.net> | 2012-06-05 13:04:59 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2012-06-05 13:04:59 (GMT) |
| commit | a0ca94afce1f63b761b2d168b5ceed5774425cfd (patch) | |
| tree | c1c94dd176de8bf93a54acd356f7f4b95563b019 | |
| parent | 3d61248b5fad6866f6ffe41a22fe451396341856 (diff) | |
| download | tcl-a0ca94afce1f63b761b2d168b5ceed5774425cfd.zip tcl-a0ca94afce1f63b761b2d168b5ceed5774425cfd.tar.gz tcl-a0ca94afce1f63b761b2d168b5ceed5774425cfd.tar.bz2 | |
3530533 Add comments to failing tests.
| -rw-r--r-- | tests/io.test | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/tests/io.test b/tests/io.test index beb5a30..68051d7 100644 --- a/tests/io.test +++ b/tests/io.test @@ -2086,6 +2086,8 @@ set path(pipe) [makeFile {} pipe] set path(output) [makeFile {} output] test io-27.6 {FlushChannel, async flushing, async close} \ {stdio asyncPipeClose openpipe} { + # This test may fail on old Unix systems (seen on IRIX64 6.5) with + # obsolete gettimeofday() calls. See Tcl Bugs 3530533, 1942197. file delete $path(pipe) file delete $path(output) set f [open $path(pipe) w] @@ -2645,6 +2647,8 @@ test io-29.30 {Tcl_WriteChars, crlf mode} { file size $path(test1) } 25 test io-29.31 {Tcl_WriteChars, background flush} {stdio openpipe} { + # This test may fail on old Unix systems (seen on IRIX64 6.5) with + # obsolete gettimeofday() calls. See Tcl Bugs 3530533, 1942197. file delete $path(pipe) file delete $path(output) set f [open $path(pipe) w] @@ -2686,6 +2690,8 @@ test io-29.31 {Tcl_WriteChars, background flush} {stdio openpipe} { } ok test io-29.32 {Tcl_WriteChars, background flush to slow reader} \ {stdio asyncPipeClose openpipe} { + # This test may fail on old Unix systems (seen on IRIX64 6.5) with + # obsolete gettimeofday() calls. See Tcl Bugs 3530533, 1942197. file delete $path(pipe) file delete $path(output) set f [open $path(pipe) w] |