libc-top-half/musl/src/math/s390x/sqrtl.c


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15

#include <math.h>

#if defined(__HTM__) || __ARCH__ >= 9

long double sqrtl(long double x)
{
	__asm__ ("sqxbr %0, %1" : "=f"(x) : "f"(x));
	return x;
}

#else

#include "../sqrtl.c"

#endif