From 8d220878d77900dc1beb088892237bda615b1719 Mon Sep 17 00:00:00 2001 From: Jarkko Hietaniemi Date: Thu, 24 Feb 2000 23:15:56 +0000 Subject: [PATCH 1/1] The op/stat.t patch in #5341 wasn't robust enough, it broke subtest 4 almost everywhere else. p4raw-id: //depot/cfgperl@5246 --- t/op/stat.t | 10 ++++++++-- 1 file changed, 8 insertions(+), 2 deletions(-) diff --git a/t/op/stat.t b/t/op/stat.t index 9c76e8b..af4920c 100755 --- a/t/op/stat.t +++ b/t/op/stat.t @@ -39,10 +39,15 @@ if (open(FOO, ">Op.stat.tmp")) { print "# |$mtime| vs |$ctime|\nnot ok 2\n"; } - sleep 3; + my $funky_FAT_timestamps = $Is_Cygwin; + + sleep 3 if $funky_FAT_timestamps; + print FOO "Now is the time for all good men to come to.\n"; close(FOO); + sleep 2 unless $funky_FAT_timestamps; + } else { print "# open failed: $!\nnot ok 1\nnot ok 2\n"; } @@ -62,7 +67,8 @@ elsif ($nlink == 2) else {print "# \$nlink is |$nlink|\nnot ok 3\n";} if ( $Is_Dosish - || ($cwd =~ m#^/tmp# and $mtime && $mtime==$ctime) # Solaris tmpfs bug + # Solaris tmpfs bug + || ($cwd =~ m#^/tmp# and $mtime && $mtime==$ctime && $^O eq 'solaris') || $cwd =~ m#/afs/# || $^O eq 'amigaos') { print "ok 4 # skipped: different semantic of mtime/ctime\n"; -- 1.8.3.1