# exit(0);
}
else {
- if ($CCTYPE ne 'GCC') {
- print "LIBRARY Perl\n";
- print "DESCRIPTION 'Perl interpreter, export autogenerated'\n";
- }
- else {
- $define{'PERL_GLOBAL_STRUCT'} = 1;
- $define{'MULTIPLICITY'} = 1;
- }
+ print "LIBRARY Perl\n";
+ print "DESCRIPTION 'Perl interpreter, export autogenerated'\n";
print "EXPORTS\n";
}
}
Perl_realloc
Perl_calloc
)];
+ if ($define{'USE_THREADS'} || $define{'USE_ITHREADS'}) {
+ emit_symbols [qw(
+ PL_malloc_mutex
+ )];
+ }
}
else {
skip_symbols [qw(
PL_sv_mutex
PL_strtab_mutex
PL_svref_mutex
- PL_malloc_mutex
PL_cred_mutex
PL_eval_mutex
PL_eval_cond