jyapayne/musl
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

initial check-in, version 0.5.0

Browse source
This commit is contained in:
Rich Felker 2011-02-12 00:22:29 -05:00
commit 0b44a0315b
1021 changed files with 45711 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

16
src/math/__fpclassifyl.c Normal file
View file

@ -0,0 +1,16 @@
#include <stdint.h>
#include <math.h>
/* FIXME: move this to arch-specific file */
int __fpclassifyl(long double __x)
{
union {
long double __ld;
__uint16_t __hw[5];
__uint64_t __m;
} __y = { __x };
int __ee = __y.__hw[4]&0x7fff;
if (!__ee) return __y.__m ? FP_SUBNORMAL : FP_ZERO;
if (__ee==0x7fff) return __y.__m ? FP_NAN : FP_INFINITE;
return FP_NORMAL;
}