diff options
| -rwxr-xr-x | ext/DB_File/t/db-btree.t | 11 | ||||
| -rwxr-xr-x | ext/DB_File/t/db-recno.t | 19 |
2 files changed, 27 insertions, 3 deletions
diff --git a/ext/DB_File/t/db-btree.t b/ext/DB_File/t/db-btree.t index 74b0cba38d..668e94a918 100755 --- a/ext/DB_File/t/db-btree.t +++ b/ext/DB_File/t/db-btree.t @@ -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; diff --git a/ext/DB_File/t/db-recno.t b/ext/DB_File/t/db-recno.t index ae1a4554c4..bd7ba83652 100755 --- a/ext/DB_File/t/db-recno.t +++ b/ext/DB_File/t/db-recno.t @@ -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 |