lib/glibc
1
0
Fork 0
mirror of https://sourceware.org/git/glibc.git synced 2025-07-28 00:21:52 +03:00
Code Activity

Fix wrong ussage of sincos for subnormal arguments

Browse Source
This commit is contained in:
Liubov Dmitrieva
2012-09-25 20:41:17 +02:00
committed by Andreas Jaeger
parent 203e56032f
commit 6d3bf19931
19 changed files with 296 additions and 30 deletions
Download Patch File Download Diff File Expand all files Collapse all files

20
math/s_csinhl.c
View File

@ -42,7 +42,15 @@ __csinhl (__complex__ long double x)
const int t = (int) ((LDBL_MAX_EXP - 1) * M_LN2l);
long double sinix, cosix;
__sincosl (__imag__ x, &sinix, &cosix);
if (__builtin_expect (icls != FP_SUBNORMAL, 1))
{
__sincosl (__imag__ x, &sinix, &cosix);
}
else
{
sinix = __imag__ x;
cosix = 1.0;
}
if (fabsl (__real__ x) > t)
{
@ -109,7 +117,15 @@ __csinhl (__complex__ long double x)
/* Imaginary part is finite. */
long double sinix, cosix;
__sincosl (__imag__ x, &sinix, &cosix);
if (__builtin_expect (icls != FP_SUBNORMAL, 1))
{
__sincosl (__imag__ x, &sinix, &cosix);
}
else
{
sinix = __imag__ x;
cosix = 1.0;
}
__real__ retval = __copysignl (HUGE_VALL, cosix);
__imag__ retval = __copysignl (HUGE_VALL, sinix);