diff options
author | Nicholas Clark <nick@ccl4.org> | 2011-07-19 16:48:07 +0200 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2011-08-01 11:53:52 +0200 |
commit | 47e4ddfcb98385296cc88313b983e1d6457585f4 (patch) | |
tree | 50aec3af686236de8869bd6b70b9a9fd55666bde /makedef.pl | |
parent | 5581753c12db7ac3d477b2911792472def374afc (diff) | |
download | perl-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.pl | 14 |
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 |