skip("Out of memory -- increase your data/heap?", 2)
if $r =~ /Out of memory/i;
is($r, '', "64K deep recursion - no output expected");
-
- if ($^O eq 'MacOS') {
- ok(1, "$^O: \$? is unreliable");
- } else {
- is($?, 0, "64K deep recursion - no coredump expected");
- }
-
+ is($?, 0, "64K deep recursion - no coredump expected");
}
}