--- AnyEvent/t/io_common	2012/04/05 03:13:27	1.7
+++ AnyEvent/t/io_common	2012/04/13 08:34:08	1.8
@@ -5,7 +5,7 @@
 # not tested: symlink, readlink, link, utime, chown, chmod
 
 BEGIN {
-   print "1..38\n";
+   print "1..37\n";
    print "ok 1 # MODEL=$AnyEvent::IO::MODEL\n";
 }
 use AnyEvent;
@@ -43,13 +43,13 @@
 t 0, rmdir => $DIR;
 
 t 1, write => $fh, "tes--";
-t 1, write => $fh, "test2truncate";
+t 1, write => $fh, "test2";
 t 1, write => $fh, "";
 
 t 1, seek  => $fh, 3, 0;
 t 1, write => $fh, "t1";
 
-t 1, truncate => $fh, 5+5;
+#t 1, truncate => $fh, 5+5; # not available on windows
 
 t 1, stat => $fh;
 print -s _ != 10 ? "not " : "", "ok ", $t++, " # stat size\n";
@@ -57,7 +57,7 @@
 t 1, close => $fh;
 
 t 1, stat => "$DIR/test";
-print -s _ != 10 ? "not " : "", "ok ", $t++, " # stat size\n";
+print -s _ != 10 ? "not " : "", "ok ", $t++, " # stat size (", -s _,")\n";
 
 t 1, lstat => "$DIR/test";
 print -s _ != 10 ? "not " : "", "ok ", $t++, " # lstat size\n";