From cc4466b7484b22db3b089a085bc005d7a5460bed Mon Sep 17 00:00:00 2001 From: Jarkko Hietaniemi Date: Fri, 13 Aug 1999 15:11:51 +0000 Subject: [PATCH] Retract change #3977 (do_open9() adds O_LARGEFILE automagically). p4raw-link: @3977 on //depot/cfgperl: a015af24b2d0b1531a3fb6be319dee296ef92ba5 p4raw-id: //depot/cfgperl@3981 --- t/lib/syslfs.t | 8 ++------ 1 file changed, 2 insertions(+), 6 deletions(-) diff --git a/t/lib/syslfs.t b/t/lib/syslfs.t index 076d06f..2955397 100644 --- a/t/lib/syslfs.t +++ b/t/lib/syslfs.t @@ -39,11 +39,7 @@ if ($^O eq 'win32' || $^O eq 'vms') { # consume less blocks than one megabyte (assuming nobody has # one megabyte blocks...) -my $O_LARGEFILE; -eval { $O_LARGEFILE = O_LARGEFILE }; -$O_LARGEFILE = 0 unless defined $O_LARGEFILE; - -sysopen(BIG, "big", O_WRONLY|O_CREAT|O_TRUNC|$O_LARGEFILE) or +sysopen(BIG, "big", O_WRONLY|O_CREAT|O_TRUNC) or do { warn "sysopen failed: $!\n"; bye }; sysseek(BIG, 1_000_000, SEEK_SET); syswrite(BIG, "big"); @@ -72,7 +68,7 @@ print "1..8\n"; my $fail = 0; -sysopen(BIG, "big", O_WRONLY|O_CREAT|O_TRUNC|$O_LARGEFILE) or +sysopen(BIG, "big", O_WRONLY|O_CREAT|O_TRUNC) or do { warn "sysopen failed: $!\n"; bye }; sysseek(BIG, 5_000_000_000, SEEK_SET); syswrite(BIG, "big"); -- 2.7.4