Be understanding about large file systems.
Jarkko Hietaniemi [Sat, 2 Oct 1999 23:43:53 +0000 (23:43 +0000)]
p4raw-id: //depot/cfgperl@4291

t/lib/syslfs.t
t/op/lfs.t

index a8a7a0c..43e66fe 100644 (file)
@@ -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++;
index 6f25231..87060e7 100644 (file)
@@ -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++;