aabc2/KOS_qrcodes
1
0
Fork 0
forked from KolibriOS/kolibrios
Code Pull Requests Activity

newlib: update

Browse Source 
git-svn-id: svn://kolibrios.org@6099 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
Sergey Semyonov (Serge)
2016-01-26 02:29:46 +00:00
parent 38392b6ca6
commit cabcfc4bb3
144 changed files with 6873 additions and 1545 deletions
Download Patch File Download Diff File Expand all files Collapse all files

44
contrib/sdk/sources/newlib/libc/stdlib/strtold.c
View File

@@ -31,12 +31,50 @@ POSSIBILITY OF SUCH DAMAGE.
#include <stdlib.h>
#include "local.h"
/* On platforms where long double is as wide as double. */
#ifdef _HAVE_LONG_DOUBLE
#if defined (__x86_64__) || defined (__i386__)
static const int map[] = {
1, /* round to nearest */
3, /* round to zero */
2, /* round to negative infinity */
0 /* round to positive infinity */
};
int
__flt_rounds(void)
{
int x;
/* Assume that the x87 and the SSE unit agree on the rounding mode. */
__asm("fnstcw %0" : "=m" (x));
return (map[(x >> 10) & 0x03]);
}
#define FLT_ROUNDS __flt_rounds()
#else
#define FLT_ROUNDS 0
#endif
long double
_strtold_r (struct _reent *ptr, const char *__restrict s00,
char **__restrict se)
{
#ifdef _LDBL_EQ_DBL
/* On platforms where long double is as wide as double. */
return _strtod_r (ptr, s00, se);
#else
long double result;
_strtorx_r (ptr, s00, se, FLT_ROUNDS, &result);
return result;
#endif
}
long double
strtold (const char *__restrict s00, char **__restrict se)
{
return strtod(s00, se);
return _strtold_r (_REENT, s00, se);
}
#endif /* _LDBL_EQ_DBL */
#endif /* _HAVE_LONG_DOUBLE */