)];
}
+unless ($define{'DEBUG_LEAKING_SCALARS_FORK_DUMP'}) {
+ skip_symbols [qw(
+ PL_dumper_fd
+ )];
+}
+unless ($define{'PERL_DONT_CREATE_GVSV'}) {
+ skip_symbols [qw(
+ Perl_gv_SVadd
+ )];
+}
+
unless ($define{'d_mmap'}) {
skip_symbols [qw(
PL_mmap_page_size
{
try_symbol($symbol);
}
+ if ($CCTYPE eq "BORLAND") {
+ try_symbol('_matherr');
+ }
}
elsif ($PLATFORM eq 'os2') {
open MAP, 'miniperl.map' or die 'Cannot read miniperl.map';