]>
git.ipfire.org Git - thirdparty/glibc.git/blob - math/w_hypot_compat.c
1 /* @(#)w_hypot.c 5.1 93/09/24 */
3 * ====================================================
4 * Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
6 * Developed at SunPro, a Sun Microsystems, Inc. business.
7 * Permission to use, copy, modify, and distribute this
8 * software is freely granted, provided that this notice
10 * ====================================================
18 #include <math_private.h>
19 #include <math-svid-compat.h>
24 __hypot (double x
, double y
)
26 double z
= __ieee754_hypot(x
,y
);
27 if(__builtin_expect(!isfinite(z
), 0)
28 && isfinite(x
) && isfinite(y
) && _LIB_VERSION
!= _IEEE_
)
29 return __kernel_standard(x
, y
, 4); /* hypot overflow */
33 weak_alias (__hypot
, hypot
)
34 # ifdef NO_LONG_DOUBLE
35 strong_alias (__hypot
, __hypotl
)
36 weak_alias (__hypot
, hypotl
)