From fbb0eb779327ff1babbc9f796e109c6321e1d04d Mon Sep 17 00:00:00 2001
From: markd <markd@pkgsrc.org>
Date: Mon, 19 Dec 2005 12:51:50 +0000
Subject: avoid computed static constant (which was in any case the wrong
 value) in log1p().  From R svn.  Should fix build on NetBSD-1.6.2.

---
 math/R/distinfo         |  3 ++-
 math/R/patches/patch-ae | 25 +++++++++++++++++++++++++
 2 files changed, 27 insertions(+), 1 deletion(-)
 create mode 100644 math/R/patches/patch-ae

(limited to 'math')

diff --git a/math/R/distinfo b/math/R/distinfo
index 13f6f71605b..27fa61e389e 100644
--- a/math/R/distinfo
+++ b/math/R/distinfo
@@ -1,4 +1,4 @@
-$NetBSD: distinfo,v 1.27 2005/12/11 14:37:12 markd Exp $
+$NetBSD: distinfo,v 1.28 2005/12/19 12:51:50 markd Exp $
 
 SHA1 (R-2.2.0.tar.gz) = ebaafa21036877b4ee3d4de9d85cce20f5cf9cbc
 RMD160 (R-2.2.0.tar.gz) = 9f54eb83c34565cbc483d2ffcc7dcae730ca674a
@@ -7,4 +7,5 @@ SHA1 (patch-aa) = 52f7ca0159087a6a5f319dd5476223785fe75a7a
 SHA1 (patch-ab) = b724b549cd9920865c4d4ae60c71dff48c4c0c06
 SHA1 (patch-ac) = ce9e1b9f3de07ea3724a1215cfe648770d5c09ca
 SHA1 (patch-ad) = 83c9b046822b1d350daec8739ca4ee2a6b7e1978
+SHA1 (patch-ae) = 1253bbd786dc912650598c4f11177de00a259fec
 SHA1 (patch-at) = d972e1072a7f6a30b5fbc2e5fa076bc5bdec5952
diff --git a/math/R/patches/patch-ae b/math/R/patches/patch-ae
new file mode 100644
index 00000000000..3e01881b54d
--- /dev/null
+++ b/math/R/patches/patch-ae
@@ -0,0 +1,25 @@
+$NetBSD: patch-ae,v 1.11 2005/12/19 12:51:50 markd Exp $
+
+--- src/nmath/log1p.c.orig	2005-07-28 08:10:05.000000000 +1200
++++ src/nmath/log1p.c
+@@ -98,16 +98,17 @@ double log1p(double x)
+ 	-.33410026677731010351377066666666e-30,
+ 	+.63533936180236187354180266666666e-31,
+     };
+-    const static double xmin = -1 + sqrt(1/DBL_EPSILON);/*was sqrt(d1mach(4)); */
+ 
+ #ifdef NOMORE_FOR_THREADS
+     static int nlnrel = 0;
++    static double xmin = 0.0;
+ 
+-    if (nlnrel == 0) {/* initialize chebychev coefficients */
++    if (xmin == 0.0) xmin = -1 + sqrt(DBL_EPSILON);/*was sqrt(d1mach(4)); */
++    if (nlnrel == 0) /* initialize chebychev coefficients */
+ 	nlnrel = chebyshev_init(alnrcs, 43, DBL_EPSILON/20);/*was .1*d1mach(3)*/
+-    }
+ #else
+ # define nlnrel 22
++    const static double xmin = -0.999999985;
+ /* 22: for IEEE double precision where DBL_EPSILON =  2.22044604925031e-16 */
+ #endif
+ 
-- 
cgit v1.2.3