summaryrefslogtreecommitdiff
path: root/makedef.pl
diff options
context:
space:
mode:
authorRainer Tammer <tammer@tammer.net>2008-11-17 09:53:34 +0100
committerH.Merijn Brand <h.m.brand@xs4all.nl>2008-11-17 08:25:49 +0000
commit5cdbb95e9cb5aae7bc0885e7a2361fa6fe145e0c (patch)
tree11fac1b7607829ffd0d82ff77f5cc42bbf8dfffe /makedef.pl
parentec93b65fd8c6a7ae08d0f88100de0c755ed21a94 (diff)
downloadperl-5cdbb95e9cb5aae7bc0885e7a2361fa6fe145e0c.tar.gz
Re: 5.8.9 RC1 report
Message-ID: <492122FE.5020001@tammer.net> p4raw-id: //depot/perl@34861
Diffstat (limited to 'makedef.pl')
-rw-r--r--makedef.pl5
1 files changed, 5 insertions, 0 deletions
diff --git a/makedef.pl b/makedef.pl
index b8d32cb538..4456dd607a 100644
--- a/makedef.pl
+++ b/makedef.pl
@@ -129,6 +129,7 @@ while (<CFG>) {
$define{$1} = 1 if /^\s*#\s*define\s+(MULTIPLICITY)\b/;
$define{$1} = 1 if /^\s*#\s*define\s+(PERL_\w+)\b/;
$define{$1} = 1 if /^\s*#\s*define\s+(USE_\w+)\b/;
+ $define{$1} = 1 if /^\s*#\s*define\s+(HAS_\w+)\b/;
}
close(CFG);
@@ -404,6 +405,10 @@ elsif ($PLATFORM eq 'aix') {
PL_statusvalue_vms
PL_sys_intern
)]);
+ skip_symbols([qw(
+ Perl_signbit
+ )])
+ if $define{'HAS_SIGNBIT'};
emit_symbols([qw(
boot_DynaLoader
)]);