Be explicit about the two DB_File tests croaking
Jarkko Hietaniemi [Sat, 6 Apr 2002 18:50:17 +0000 (18:50 +0000)]
in Mac OS X.

p4raw-id: //depot/perl@15769

ext/DB_File/t/db-btree.t
ext/DB_File/t/db-recno.t

index 74b0cba..668e94a 100755 (executable)
@@ -18,6 +18,17 @@ BEGIN {
             exit 0;
         }
     }
+    if ($^O eq 'darwin'
+       && $Config{db_version_major} == 1
+       && $Config{db_version_minor} == 0
+       && $Config{db_version_patch} == 0) {
+       warn <<EOM;
+#
+# This test is known to crash in Mac OS X versions 10.1.3 (or earlier)
+# because of the buggy Berkeley DB version included with the OS.
+#
+EOM
+    }
 }
 
 use DB_File; 
index ae1a455..bd7ba83 100755 (executable)
@@ -91,10 +91,22 @@ sub docat_del
 
 sub bad_one
 {
-    print STDERR <<EOM unless $bad_ones++ ;
+    unless ($bad_ones++) {
+       print STDERR <<EOM ;
 #
-# Some older versions of Berkeley DB version 1 will fail tests 61,
-# 63 and 65.
+# Some older versions of Berkeley DB version 1 will fail db-recno
+# tests 61, 63 and 65.
+EOM
+        if ($^O eq 'darwin') {
+       print STDERR <<EOM ;
+#
+#  For example Mac OS X 10.1.3 (or earlier) has such an old
+#  version of Berkeley DB.
+#
+EOM
+       }
+
+       print STDERR <<EOM ;
 #
 # You can safely ignore the errors if you're never going to use the
 # broken functionality (recno databases with a modified bval). 
@@ -105,6 +117,7 @@ sub bad_one
 # being updated -- Check out http://www.sleepycat.com/ for more details.
 #
 EOM
+    }
 }
 
 sub normalise