From: Spider Boardman <spider@orb.nashua.nh.us>
Date: Thu, 31 Aug 2000 11:48:48 +0000 (-0400)
Subject: POSIX doesn't report long double values under -Duselongdouble
X-Git-Tag: accepted/trunk/20130322.191538~34232
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=53796371599bf0ffdbd56139e8027e8e40cf0f6c;p=platform%2Fupstream%2Fperl.git

POSIX doesn't report long double values under -Duselongdouble
when the long doubles are "real" (bigger than doubles).

Subject: [ID 20000831.014] Not OK: perl v5.7.0 +DEVEL6919 on alpha-dec_osf-ld 5.1
Message-Id: <200008311548.LAA0000161952@peano.zk3.dec.com>

p4raw-id: //depot/perl@6949
---

diff --git a/ext/POSIX/POSIX.xs b/ext/POSIX/POSIX.xs
index 06869f6..a536671 100644
--- a/ext/POSIX/POSIX.xs
+++ b/ext/POSIX/POSIX.xs
@@ -539,7 +539,7 @@ mini_mktime(struct tm *ptm)
 }
 
 #ifdef HAS_LONG_DOUBLE
-#  if LONG_DOUBLESIZE > DOUBLESIZE
+#  if LONG_DOUBLESIZE > NVSIZE
 #    undef HAS_LONG_DOUBLE  /* XXX until we figure out how to use them */
 #  endif
 #endif