From: Jarkko Hietaniemi Date: Sat, 2 Oct 1999 23:43:53 +0000 (+0000) Subject: Be understanding about large file systems. X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=ae178db11db50e8d46c66980e186cfba029f0cb9;p=p5sagit%2Fp5-mst-13.2.git Be understanding about large file systems. p4raw-id: //depot/cfgperl@4291 --- diff --git a/t/lib/syslfs.t b/t/lib/syslfs.t index a8a7a0c..43e66fe 100644 --- a/t/lib/syslfs.t +++ b/t/lib/syslfs.t @@ -116,6 +116,12 @@ unless($syswrite && $close) { print "# @s\n"; +unless ($s[7] == 5_000_000_003) { + print "1..0\n# not configured to use large files?\n"; + explain(); + bye(); +} + sub fail () { print "not "; $fail++; diff --git a/t/op/lfs.t b/t/op/lfs.t index 6f25231..87060e7 100644 --- a/t/op/lfs.t +++ b/t/op/lfs.t @@ -120,6 +120,12 @@ unless ($print && $close) { print "# @s\n"; +unless ($s[7] == 5_000_000_003) { + print "1..0\n# not configured to use large files?\n"; + explain(); + bye(); +} + sub fail () { print "not "; $fail++;