Change 34885: Integrate:

[Nicholas Clark]

Change 34885 by [EMAIL PROTECTED] on 2008/11/18 15:40:34

        Integrate:
        [ 34861]
        Subject: Re: 5.8.9 RC1 report
        From: Rainer Tammer <[EMAIL PROTECTED]>
        Date: Mon, 17 Nov 2008 08:53:34 +0100
        Message-ID: <[EMAIL PROTECTED]>

Affected files ...

... //depot/maint-5.10/perl/makedef.pl#5 integrate

Differences ...

==== //depot/maint-5.10/perl/makedef.pl#5 (text) ====
Index: perl/makedef.pl
--- perl/makedef.pl#4~34426~    2008-09-26 12:06:51.000000000 -0700
+++ perl/makedef.pl     2008-11-18 07:40:34.000000000 -0800
@@ -129,6 +129,7 @@
     $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 @@
                     PL_statusvalue_vms
                     PL_sys_intern
                     )]);
+    skip_symbols([qw(
+                    Perl_signbit
+                    )])
+       if $define{'HAS_SIGNBIT'};
     emit_symbols([qw(
                     boot_DynaLoader
                     )]);
End of Patch.