In perl.git, the branch blead has been updated

<http://perl5.git.perl.org/perl.git/commitdiff/2efb8b4b644d5f3c28974a8f577081b4142decd2?hp=3f9568ff1ac7f258986dd9d06aa45cdc38cbda70>

- Log -----------------------------------------------------------------
commit 2efb8b4b644d5f3c28974a8f577081b4142decd2
Author: Tony Cook <[email protected]>
Date:   Thu Sep 10 09:51:43 2015 +1000

    refine the skip test for the 32-bit x86 ABI brokeness
    
    - the previous test checked ivsize, but that will be 8 for -Duse64bitint
    
    - similarly, byteorder is sized to an iv, so loosen that check to just
      make sure it's little-endian
    
    - check we have something like an Intel FPU, this particular check would
      give a false negative on MSVC, but these tests are skipped on Win32
      anyway
-----------------------------------------------------------------------

Summary of changes:
 ext/POSIX/t/math.t | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/ext/POSIX/t/math.t b/ext/POSIX/t/math.t
index 5a9759a..869d1b7 100644
--- a/ext/POSIX/t/math.t
+++ b/ext/POSIX/t/math.t
@@ -186,8 +186,8 @@ SKIP: {
           # bothering with the test if things look iffy.
           # We could, say, $Config{ccsymbols} =~ /\b__[xi][3-7]86=1\b/,
           # but that feels quite shaky.
-          $Config{byteorder} eq '1234' &&
-          $Config{ivsize} == 4 &&  # Really redundant with the 'byteorder'.
+          $Config{byteorder} =~ /1234/ &&
+          $Config{longdblkind} == 3 &&
           $Config{ptrsize} == 4;
       skip($^O, 1) if $could_be_x86_32 && !$Config{uselongdouble};
       ok(issignaling($x), "setpayloadsig + issignaling");

--
Perl5 Master Repository

Reply via email to