Blame math/w_hypotf_compat.c

Packit 6c4009
/* w_hypotf.c -- float version of w_hypot.c.
Packit 6c4009
 * Conversion to float by Ian Lance Taylor, Cygnus Support, ian@cygnus.com.
Packit 6c4009
 */
Packit 6c4009
Packit 6c4009
/*
Packit 6c4009
 * ====================================================
Packit 6c4009
 * Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
Packit 6c4009
 *
Packit 6c4009
 * Developed at SunPro, a Sun Microsystems, Inc. business.
Packit 6c4009
 * Permission to use, copy, modify, and distribute this
Packit 6c4009
 * software is freely granted, provided that this notice
Packit 6c4009
 * is preserved.
Packit 6c4009
 * ====================================================
Packit 6c4009
 */
Packit 6c4009
Packit 6c4009
/*
Packit 6c4009
 * wrapper hypotf(x,y)
Packit 6c4009
 */
Packit 6c4009
Packit 6c4009
#include <math.h>
Packit 6c4009
#include <math_private.h>
Packit 6c4009
#include <math-svid-compat.h>
Packit 6c4009
#include <libm-alias-float.h>
Packit 6c4009
Packit 6c4009
Packit 6c4009
#if LIBM_SVID_COMPAT
Packit 6c4009
float
Packit 6c4009
__hypotf(float x, float y)
Packit 6c4009
{
Packit 6c4009
	float z = __ieee754_hypotf(x,y);
Packit 6c4009
	if(__builtin_expect(!isfinite(z), 0)
Packit 6c4009
	   && isfinite(x) && isfinite(y) && _LIB_VERSION != _IEEE_)
Packit 6c4009
	    /* hypot overflow */
Packit 6c4009
	    return __kernel_standard_f(x, y, 104);
Packit 6c4009
Packit 6c4009
	return z;
Packit 6c4009
}
Packit 6c4009
libm_alias_float (__hypot, hypot)
Packit 6c4009
#endif