diff options
| author | dgp <dgp@users.sourceforge.net> | 2012-06-05 13:06:09 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2012-06-05 13:06:09 (GMT) |
| commit | d76edb0ec44183dc834db1d64615b4c1456e9054 (patch) | |
| tree | a3bb935589218eb26716faa141fdcfa680bf4d52 | |
| parent | be7669ae584a678f38b935b2af3c54c5a90c97af (diff) | |
| parent | a0ca94afce1f63b761b2d168b5ceed5774425cfd (diff) | |
| download | tcl-d76edb0ec44183dc834db1d64615b4c1456e9054.zip tcl-d76edb0ec44183dc834db1d64615b4c1456e9054.tar.gz tcl-d76edb0ec44183dc834db1d64615b4c1456e9054.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 386179e..f3c39f4 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] |