summaryrefslogtreecommitdiff
path: root/makedef.pl
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2011-07-19 16:48:07 +0200
committerNicholas Clark <nick@ccl4.org>2011-08-01 11:53:52 +0200
commit47e4ddfcb98385296cc88313b983e1d6457585f4 (patch)
tree50aec3af686236de8869bd6b70b9a9fd55666bde /makedef.pl
parent5581753c12db7ac3d477b2911792472def374afc (diff)
downloadperl-47e4ddfcb98385296cc88313b983e1d6457585f4.tar.gz
In makedef.pl, skip Perl_signbit when HAS_SIGNBIT is defined.
Previously this condition was only checked on AIX and VMS. However, as all the other platforms don't have HAS_SIGNBIT defined, this simplifies the code with no change in output.
Diffstat (limited to 'makedef.pl')
-rw-r--r--makedef.pl14
1 files changed, 6 insertions, 8 deletions
diff --git a/makedef.pl b/makedef.pl
index ca224ba3e0..2771cc173f 100644
--- a/makedef.pl
+++ b/makedef.pl
@@ -302,10 +302,6 @@ elsif ($PLATFORM eq 'aix') {
skip_symbols([qw(
PL_statusvalue_vms
)]);
- skip_symbols([qw(
- Perl_signbit
- )])
- if $define{'HAS_SIGNBIT'};
}
elsif ($PLATFORM eq 'os2') {
emit_symbols([qw(
@@ -480,10 +476,6 @@ elsif ($PLATFORM eq 'vms') {
skip_symbols([qw(
PL_statusvalue_posix
)]);
- skip_symbols([qw(
- Perl_signbit
- )])
- if $define{'HAS_SIGNBIT'};
}
unless ($define{UNLINK_ALL_VERSIONS}) {
@@ -869,6 +861,12 @@ unless ($define{HAVE_INTERP_INTERN}) {
)];
}
+if ($define{HAS_SIGNBIT}) {
+ skip_symbols([qw(
+ Perl_signbit
+ )])
+}
+
if ($^O ne 'vms') {
# VMS does its own thing for these symbols.
skip_symbols [qw(PL_sig_handlers_initted