From 25113f286be4ac32a124404b178f244c9508c954 Mon Sep 17 00:00:00 2001
From: "Paul E. Murphy" <murphyp@linux.vnet.ibm.com>
Date: Wed, 31 Aug 2016 13:17:35 -0500
Subject: [PATCH] ldbl-128: Cleanup e_gammal_r.c after _Float128 rename
* sysdeps/ieee754/ldbl-128/e_gammal_r.c:
(gammal_positive): Fix spacing.
(__ieee754_gammal_r): Likewise.
---
sysdeps/ieee754/ldbl-128/e_gammal_r.c | 12 ++++++------
1 file changed, 6 insertions(+), 6 deletions(-)
@@ -105,10 +105,10 @@ gammal_positive (_Float128 x, int *exp2_adj)
}
*exp2_adj = x_adj_log2 * (int) x_adj_int;
_Float128 ret = (__ieee754_powl (x_adj_mant, x_adj)
- * __ieee754_exp2l (x_adj_log2 * x_adj_frac)
- * __ieee754_expl (-x_adj)
- * __ieee754_sqrtl (2 * M_PIl / x_adj)
- / prod);
+ * __ieee754_exp2l (x_adj_log2 * x_adj_frac)
+ * __ieee754_expl (-x_adj)
+ * __ieee754_sqrtl (2 * M_PIl / x_adj)
+ / prod);
exp_adj += x_eps * __ieee754_logl (x_adj);
_Float128 bsum = gamma_coeff[NCOEFF - 1];
_Float128 x_adj2 = x_adj * x_adj;
@@ -188,8 +188,8 @@ __ieee754_gammal_r (_Float128 x, int *signgamp)
if (frac > 0.5L)
frac = 1.0L - frac;
_Float128 sinpix = (frac <= 0.25L
- ? __sinl (M_PIl * frac)
- : __cosl (M_PIl * (0.5L - frac)));
+ ? __sinl (M_PIl * frac)
+ : __cosl (M_PIl * (0.5L - frac)));
int exp2_adj;
ret = M_PIl / (-x * sinpix
* gammal_positive (-x, &exp2_adj));
--
2.4.11