diff options
Diffstat (limited to 'ext/Fcntl')
-rw-r--r-- | ext/Fcntl/t/syslfs.t | 8 |
1 files changed, 1 insertions, 7 deletions
diff --git a/ext/Fcntl/t/syslfs.t b/ext/Fcntl/t/syslfs.t index c6252cc934..e5996b3084 100644 --- a/ext/Fcntl/t/syslfs.t +++ b/ext/Fcntl/t/syslfs.t @@ -22,12 +22,8 @@ our $fail; (undef, my $big1) = tempfile(UNLINK => 1); (undef, my $big2) = tempfile(UNLINK => 1); -sub zap { - close(BIG); -} - sub bye { - zap(); + close(BIG); exit(0); } @@ -108,8 +104,6 @@ my @s2 = stat($big2); print "# s2 = @s2\n"; -zap(); - unless ($s1[7] == 1_000_003 && $s2[7] == 2_000_003 && $s1[11] == $s2[11] && $s1[12] == $s2[12] && $s1[12] > 0) { |