sysdeps/ieee754/ldbl-96/s_copysignl.c

   1 /* s_copysignl.c -- long double version of s_copysign.c.
   2  */
   3
   4 /*
   5  * ====================================================
   6  * Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
   7  *
   8  * Developed at SunPro, a Sun Microsystems, Inc. business.
   9  * Permission to use, copy, modify, and distribute this
  10  * software is freely granted, provided that this notice
  11  * is preserved.
  12  * ====================================================
  13  */
  14
  15 #if defined(LIBM_SCCS) && !defined(lint)
  16 static char rcsid[] = "$NetBSD: $";
  17 #endif
  18
  19 /*
  20  * copysignl(long double x, long double y)
  21  * copysignl(x,y) returns a value with the magnitude of x and
  22  * with the sign bit of y.
  23  */
  24
  25 #define NO_MATH_REDIRECT
  26 #include <math.h>
  27 #include <libm-alias-ldouble.h>
  28
  29 long double
  30 __copysignl (long double x, long double y)
  31 {
  32   return __builtin_copysignl (x, y);
  33 }
  34 libm_alias_ldouble (__copysign, copysign)