math: remove a useless assignment in lgammal found by clang analyzer
the issue was reported by Alexander Monakov
This commit is contained in:
parent
38a0a4db2f
commit
e71981af77
1 changed files with 2 additions and 2 deletions
|
|
@ -341,12 +341,12 @@ long double __lgammal_r(long double x, int *sg) {
|
||||||
} else if (ix < 0x40028000) { /* 8.0 */
|
} else if (ix < 0x40028000) { /* 8.0 */
|
||||||
/* x < 8.0 */
|
/* x < 8.0 */
|
||||||
i = (int)x;
|
i = (int)x;
|
||||||
t = 0.0;
|
|
||||||
y = x - (double)i;
|
y = x - (double)i;
|
||||||
p = y * (s0 + y * (s1 + y * (s2 + y * (s3 + y * (s4 + y * (s5 + y * s6))))));
|
p = y * (s0 + y * (s1 + y * (s2 + y * (s3 + y * (s4 + y * (s5 + y * s6))))));
|
||||||
q = r0 + y * (r1 + y * (r2 + y * (r3 + y * (r4 + y * (r5 + y * (r6 + y))))));
|
q = r0 + y * (r1 + y * (r2 + y * (r3 + y * (r4 + y * (r5 + y * (r6 + y))))));
|
||||||
r = 0.5 * y + p / q;
|
r = 0.5 * y + p / q;
|
||||||
z = 1.0;/* lgamma(1+s) = log(s) + lgamma(s) */
|
z = 1.0;
|
||||||
|
/* lgamma(1+s) = log(s) + lgamma(s) */
|
||||||
switch (i) {
|
switch (i) {
|
||||||
case 7:
|
case 7:
|
||||||
z *= (y + 6.0); /* FALLTHRU */
|
z *= (y + 6.0); /* FALLTHRU */
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue