blob: c66ef2d42f7700323205dc554445e9f6bebcb35c (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
$NetBSD: patch-src_nmath_dnbeta.c,v 1.2 2013/12/15 19:58:11 asau Exp $
No logl() in NetBSD 6.x and FreeBSD 9.
--- src/nmath/dnbeta.c.orig 2013-03-05 23:02:41.000000000 +0000
+++ src/nmath/dnbeta.c
@@ -118,7 +118,7 @@ double dnbeta(double x, double a, double
sum += term;
} while (term > sum * eps);
-#ifdef HAVE_LONG_DOUBLE
+#if defined(HAVE_LONG_DOUBLE) && ! defined(__NetBSD__) && ! defined(__FreeBSD__)
return R_D_exp((double)(p_k + logl(sum)));
#else
return R_D_exp((double)(p_k + log(sum)));
|