1/*
2 * Written by J.T. Conklin <jtc@netbsd.org>.
3 * Public domain.
4 *
5 * Adapted for `long double' by Ulrich Drepper <drepper@cygnus.com>.
6 */
7
8#include <math_private.h>
9#include <libm-alias-finite.h>
10
11#undef __ieee754_sqrtl
12long double
13__ieee754_sqrtl (long double x)
14{
15 long double res;
16
17 asm ("fsqrt" : "=t" (res) : "0" (x));
18
19 return res;
20}
21libm_alias_finite (__ieee754_sqrtl, __sqrtl)
22