libc-top-half/musl/src/math/__signbitl.c

   1 #include "libm.h"
   2
   3 #if (LDBL_MANT_DIG == 64 || LDBL_MANT_DIG == 113) && LDBL_MAX_EXP == 16384
   4 int __signbitl(long double x)
   5 {
   6         union ldshape u = {x};
   7         return u.i.se >> 15;
   8 }
   9 #elif LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
  10 int __signbitl(long double x)
  11 {
  12         return __signbit(x);
  13 }
  14 #endif