Skip to content

Latest commit

 

History

History
12 lines (11 loc) · 506 Bytes

perl-5.10.0-x86_64-io-test-failure.patch

File metadata and controls

12 lines (11 loc) · 506 Bytes
Raw
 
Oct 4, 2011
Initial import
Oct 4, 2011
1
2
3
4
5
6
7
8
9
10
11
12
diff -up perl-5.10.0/t/io/fs.t.BAD perl-5.10.0/t/io/fs.t
--- perl-5.10.0/t/io/fs.t.BAD 2008-01-30 13:36:43.000000000 -0500
+++ perl-5.10.0/t/io/fs.t 2008-01-30 13:41:27.000000000 -0500
@@ -227,7 +227,7 @@ isnt($atime, 500000000, 'atime');
isnt($mtime, 500000000 + $delta, 'mtime');
SKIP: {
- skip "no futimes", 4 unless ($Config{d_futimes} || "") eq "define";
+ skip "no futimes", 4;
open(my $fh, "<", 'b');
$foo = (utime 500000000,500000000 + $delta, $fh);
is($foo, 1, "futime");