glibc/sysdeps/i386/fpu/e_sqrtl.c

/*
 * Written by J.T. Conklin <jtc@netbsd.org>.
 * Public domain.
 *
 * Adapted for `long double' by Ulrich Drepper <drepper@cygnus.com>.
 */

#include <math_private.h>

#undef __ieee754_sqrtl
long double
__ieee754_sqrtl (long double x)
{
  long double res;

  asm ("fsqrt" : "=t" (res) : "0" (x));

  return res;
}
strong_alias (__ieee754_sqrtl, __sqrtl_finite)
Update. 2001-05-06 Andreas Jaeger <aj@suse.de> * sysdeps/i386/fpu/e_acosl.c: New, rewrite of e_acos.S. * sysdeps/i386/fpu/s_atanl.c: New, rewrite of e_atanl.S. * sysdeps/i386/fpu/e_sqrtl.c: New, rewrite of e_sqrt.S. * sysdeps/i386/fpu/e_acosl.S: Removed. * sysdeps/i386/fpu/s_atanl.S: Removed. * sysdeps/i386/fpu/e_sqrtl.S: Removed. 2001-05-06 17:03:45 +00:00			`/*`
			`* Written by J.T. Conklin <jtc@netbsd.org>.`
			`* Public domain.`
			`*`
			* Adapted for `long double' by Ulrich Drepper <drepper@cygnus.com>.
			`*/`

			`#include <math_private.h>`

Optimize libm libm is now somewhat integrated with gcc's -ffinite-math-only option and lots of the wrapper functions have been optimized. 2011-10-12 15:27:51 +00:00			`#undef __ieee754_sqrtl`
Update. 2001-05-06 Andreas Jaeger <aj@suse.de> * sysdeps/i386/fpu/e_acosl.c: New, rewrite of e_acos.S. * sysdeps/i386/fpu/s_atanl.c: New, rewrite of e_atanl.S. * sysdeps/i386/fpu/e_sqrtl.c: New, rewrite of e_sqrt.S. * sysdeps/i386/fpu/e_acosl.S: Removed. * sysdeps/i386/fpu/s_atanl.S: Removed. * sysdeps/i386/fpu/e_sqrtl.S: Removed. 2001-05-06 17:03:45 +00:00			`long double`
			`__ieee754_sqrtl (long double x)`
			`{`
			`long double res;`

			`asm ("fsqrt" : "=t" (res) : "0" (x));`

			`return res;`
			`}`
Optimize libm libm is now somewhat integrated with gcc's -ffinite-math-only option and lots of the wrapper functions have been optimized. 2011-10-12 15:27:51 +00:00			`strong_alias (__ieee754_sqrtl, __sqrtl_finite)`