blob: 043f1ee2c0de9dc255cd6379fe5bab07dd6b7b2b (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
|
/* { dg-options "-O2 -mcmodel=small -fPIC" } */
/* { dg-do compile } */
extern int __finite (double __value) __attribute__ ((__nothrow__)) __attribute__ ((__const__));
extern int __finitef (float __value) __attribute__ ((__nothrow__)) __attribute__ ((__const__));
extern int __signbit (double __value) __attribute__ ((__nothrow__)) __attribute__ ((__const__));
extern int __signbitf (float __value) __attribute__ ((__nothrow__)) __attribute__ ((__const__));
int
__ecvt_r (value, ndigit, decpt, sign, buf, len)
double value;
int ndigit, *decpt, *sign, len;
char *buf;
{
if ((sizeof (value) == sizeof (float) ? __finitef (value) : __finite (value)) && value != 0.0)
{
double d;
double f = 1.0;
d = -value;
if (d < 1.0e-307)
{
do
{
f *= 10.0;
}
while (d * f < 1.0);
}
}
if (ndigit <= 0 && len > 0)
{
buf[0] = '\0';
*sign = (sizeof (value) == sizeof (float) ? __finitef (value) : __finite (value)) ? (sizeof (value) == sizeof (float) ? __signbitf (value) : __signbit (value)) != 0 : 0;
}
}
|
