diff options
Diffstat (limited to 't/io/fs.t')
-rwxr-xr-x | t/io/fs.t | 10 |
1 files changed, 2 insertions, 8 deletions
@@ -263,7 +263,7 @@ close(IOFSCOM); SKIP: { # Check truncating a closed file. eval { truncate "Iofs.tmp", 5; }; - + skip("no truncate - $@", 10) if $@; is(-s "Iofs.tmp", 5, "truncation to five bytes"); @@ -295,7 +295,7 @@ SKIP: { if ($needs_fh_reopen) { close (FH); open (FH, ">>Iofs.tmp") or die "Can't reopen Iofs.tmp"; } - + if ($^O eq 'vos') { skip ("# TODO - hit VOS bug posix-973 - cannot resize an open file below the current file pos.", 7); } @@ -310,12 +310,6 @@ SKIP: { ok(-z "Iofs.tmp", "fh resize to zero working (filename check)"); - ok(truncate(FH, 200), "fh resize to 200"); - is(-s FH, 200, "fh resize to 200 working (FH check)"); - - ok(truncate(FH, 0), "fh resize to 0"); - ok(-z FH, "fh resize to 0 working (FH check)"); - close FH; } |