From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Thu, 28 Jul 2016 16:55:07 +0000 (-0700)
Subject: [perl #128763] Fix POSIX.xs longdbl assertion
X-Git-Tag: v5.25.4~258
X-Git-Url: https://perl5.git.perl.org/perl5.git/commitdiff_plain/d80a6052a64d2df61ee61888853ef5f3872c0e34

[perl #128763] Fix POSIX.xs longdbl assertion
---

diff --git a/ext/POSIX/POSIX.xs b/ext/POSIX/POSIX.xs
index 3820026..a950af3 100644
--- a/ext/POSIX/POSIX.xs
+++ b/ext/POSIX/POSIX.xs
@@ -1153,7 +1153,7 @@ static NV my_trunc(NV x)
 #  define NV_PAYLOAD_TYPE NV
 #endif
 
-#ifdef LONGDOUBLE_DOUBLEDOUBLE
+#if defined(USE_LONG_DOUBLE) && defined(LONGDOUBLE_DOUBLEDOUBLE)
 #  define NV_PAYLOAD_SIZEOF_ASSERT(a) assert(sizeof(a) == NVSIZE / 2)
 #else
 #  define NV_PAYLOAD_SIZEOF_ASSERT(a) assert(sizeof(a) == NVSIZE)