diff options
Diffstat (limited to 't/op/stat.t')
| -rwxr-xr-x | t/op/stat.t | 15 |
1 files changed, 8 insertions, 7 deletions
diff --git a/t/op/stat.t b/t/op/stat.t index 0713007db5..84c5283ce5 100755 --- a/t/op/stat.t +++ b/t/op/stat.t @@ -27,7 +27,8 @@ $junk = `ls Op.stat.tmp` unless $Is_MSWin32; ($dev,$ino,$mode,$nlink,$uid,$gid,$rdev,$size,$atime,$mtime,$ctime, $blksize,$blocks) = stat(FOO); if ($nlink == 1) {print "ok 1\n";} else {print "not ok 1\n";} -if ($mtime && $mtime == $ctime) {print "ok 2\n";} else {print "not ok 2\n";} +if ($Is_MSWin32 || ($mtime && $mtime == $ctime)) {print "ok 2\n";} +else {print "# |$mtime| vs |$ctime|\nnot ok 2\n";} print FOO "Now is the time for all good men to come to.\n"; close(FOO); @@ -42,16 +43,16 @@ else { ($dev,$ino,$mode,$nlink,$uid,$gid,$rdev,$size,$atime,$mtime,$ctime, $blksize,$blocks) = stat('Op.stat.tmp'); -if ($Config{dont_use_nlink} || $nlink == 2) - {print "ok 3\n";} else {print "not ok 3\n";} +if ($Is_MSWin32 || $Config{dont_use_nlink} || $nlink == 2) + {print "ok 3\n";} else {print "# \$nlink is |$nlink|\nnot ok 3\n";} -if (($mtime && $mtime != $ctime) || $cwd =~ m#/afs/# || $^O eq 'amigaos') { +if ($Is_MSWin32 || ($mtime && $mtime != $ctime) || $cwd =~ m#/afs/# || $^O eq 'amigaos') { print "ok 4\n"; } else { print "not ok 4\n"; - print '#4 If test op/stat.t fails test 4, check if you are on a tmpfs'; - print '#4 of some sort. Building in /tmp sometimes has this problem.'; + print "#4 If test op/stat.t fails test 4, check if you are on a tmpfs\n"; + print "#4 of some sort. Building in /tmp sometimes has this problem.\n"; } print "#4 :$mtime: != :$ctime:\n"; @@ -84,7 +85,7 @@ foreach ((12,13,14,15,16,17)) { chmod 0700,'Op.stat.tmp'; if (-r 'Op.stat.tmp') {print "ok 18\n";} else {print "not ok 18\n";} if (-w 'Op.stat.tmp') {print "ok 19\n";} else {print "not ok 19\n";} -if (-x 'Op.stat.tmp') {print "ok 20\n";} else {print "not ok 20\n";} +if ($Is_MSWin32 or -x 'Op.stat.tmp') {print "ok 20\n";} else {print "not ok 20\n";} if (-f 'Op.stat.tmp') {print "ok 21\n";} else {print "not ok 21\n";} if (! -d 'Op.stat.tmp') {print "ok 22\n";} else {print "not ok 22\n";} |