newlib-cygwin/winsup/mingw/mingwex/math/signbitl.c

12 lines
246 B
C

#define __FP_SIGNBIT 0x0200
int __signbitl (long double x) {
unsigned short sw;
__asm__ ("fxam; fstsw %%ax;"
: "=a" (sw)
: "t" (x) );
return sw & __FP_SIGNBIT;
}
int __attribute__ ((alias ("__signbitl"))) signbitl (long double);