summaryrefslogtreecommitdiffstats
path: root/tests/io.test
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2012-06-05 13:04:59 (GMT)
committerdgp <dgp@users.sourceforge.net>2012-06-05 13:04:59 (GMT)
commita0ca94afce1f63b761b2d168b5ceed5774425cfd (patch)
treec1c94dd176de8bf93a54acd356f7f4b95563b019 /tests/io.test
parent3d61248b5fad6866f6ffe41a22fe451396341856 (diff)
downloadtcl-a0ca94afce1f63b761b2d168b5ceed5774425cfd.zip
tcl-a0ca94afce1f63b761b2d168b5ceed5774425cfd.tar.gz
tcl-a0ca94afce1f63b761b2d168b5ceed5774425cfd.tar.bz2
3530533 Add comments to failing tests.
Diffstat (limited to 'tests/io.test')
-rw-r--r--tests/io.test6
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]