AuroraMiddleware/glibc
1
0
Fork 0
mirror of https://sourceware.org/git/glibc.git synced 2024-12-23 03:10:05 +00:00
Code Issues Packages Projects Releases Wiki Activity

[BZ #4407]

Browse Source 
2008-02-12  Pete Eberlein  <eberlein@us.ibm.com>
	[BZ #4407]
	* sysdeps/ieee754/ldbl-128/e_lgammal_r.c (__ieee754_lgammal_r):
	Preserve sign in signgamp when x is zero.
This commit is contained in:
Ulrich Drepper 2008-04-10 04:58:03 +00:00
parent aece054b30
commit facd1d8ef3
2 changed files with 12 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
ChangeLog
View File

@ -1,3 +1,9 @@
2008-02-12 Pete Eberlein <eberlein@us.ibm.com>
[BZ #4407]
* sysdeps/ieee754/ldbl-128/e_lgammal_r.c (__ieee754_lgammal_r):
Preserve sign in signgamp when x is zero.
2007-10-26 Steven Munroe <sjmunroe@us.ibm.com> 2007-10-26 Steven Munroe <sjmunroe@us.ibm.com>
* sysdeps/powerpc/powerpc32/power4/fpu/w_sqrt.S: New File. * sysdeps/powerpc/powerpc32/power4/fpu/w_sqrt.S: New File.

6
sysdeps/ieee754/ldbl-128/e_lgammal_r.c
View File

@ -772,6 +772,12 @@ __ieee754_lgammal_r (x, signgamp)
if (! __finitel (x)) if (! __finitel (x))
return x * x; return x * x;
if (x == 0.0L)
{
if (__signbitl (x))
*signgamp = -1;
}
if (x < 0.0L) if (x < 0.0L)
{ {
q = -x; q = -x;