copysignl.c 371 B

12345678910111213141516
  1. #include "libm.h"
  2. #if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
  3. long double copysignl(long double x, long double y)
  4. {
  5. return copysign(x, y);
  6. }
  7. #elif (LDBL_MANT_DIG == 64 || LDBL_MANT_DIG == 113) && LDBL_MAX_EXP == 16384
  8. long double copysignl(long double x, long double y)
  9. {
  10. union ldshape ux = {x}, uy = {y};
  11. ux.bits.sign = uy.bits.sign;
  12. return ux.value;
  13. }
  14. #endif