[gnumeric] Gamma: use gnm_ldexp.
- From: Morten Welinder <mortenw src gnome org>
- To: commits-list gnome org
- Cc:
- Subject: [gnumeric] Gamma: use gnm_ldexp.
- Date: Wed, 24 Feb 2016 01:34:13 +0000 (UTC)
commit cd2f402c923205c814284fc8a791ac3847dbc954
Author: Morten Welinder <terra gnome org>
Date: Tue Feb 23 18:58:20 2016 -0500
Gamma: use gnm_ldexp.
ChangeLog | 4 ++++
src/sf-gamma.c | 8 ++++----
2 files changed, 8 insertions(+), 4 deletions(-)
---
diff --git a/ChangeLog b/ChangeLog
index 4bd8b3b..cc789c6 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2016-02-23 Morten Welinder <terra gnome org>
+
+ * src/sf-gamma.c: Properly use gnm_ldexp, not ldexp.
+
2016-02-18 Morten Welinder <terra gnome org>
* src/parse-util.c (unquote): Properly account backslashes. Fixes
diff --git a/src/sf-gamma.c b/src/sf-gamma.c
index 5e3bae2..3278af7 100644
--- a/src/sf-gamma.c
+++ b/src/sf-gamma.c
@@ -468,7 +468,7 @@ gnm_gamma (gnm_float x)
int e;
switch (qgammaf (x, &r, &e)) {
- case 0: return ldexp (gnm_quad_value (&r), e);
+ case 0: return gnm_ldexp (gnm_quad_value (&r), e);
case 1: return gnm_pinf;
default: return gnm_nan;
}
@@ -489,7 +489,7 @@ gnm_fact (gnm_float x)
int e;
switch (qfactf (x, &r, &e)) {
- case 0: return ldexp (gnm_quad_value (&r), e);
+ case 0: return gnm_ldexp (gnm_quad_value (&r), e);
case 1: return gnm_pinf;
default: return gnm_nan;
}
@@ -561,7 +561,7 @@ gnm_beta (gnm_float a, gnm_float b)
int e;
switch (qbetaf (a, b, &r, &e)) {
- case 0: return ldexp (gnm_quad_value (&r), e);
+ case 0: return gnm_ldexp (gnm_quad_value (&r), e);
case 1: return gnm_pinf;
default: return gnm_nan;
}
@@ -1371,7 +1371,7 @@ gnm_complex_continued_fraction (gnm_complex *dst, size_t N,
if (debug_cf)
g_printerr ("rescale by 2^%d\n", -e);
- s = ldexp (1, -e);
+ s = gnm_ldexp (1, -e);
A0 = GNM_CSCALE (A0, s);
A1 = GNM_CSCALE (A1, s);
B0 = GNM_CSCALE (B0, s);
[
Date Prev][
Date Next] [
Thread Prev][
Thread Next]
[
Thread Index]
[
Date Index]
[
Author Index]