summaryrefslogblamecommitdiff
path: root/src/math/s390x/sqrtl.c
blob: 5702d54da0cf0ed3124eb1057852056630ecaa8d (plain) (tree)
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