github.com/afumu/libc@v0.0.6/musl/src/math/s390x/sqrtl.c (about)

     1  #include <math.h>
     2  
     3  #if defined(__HTM__) || __ARCH__ >= 9
     4  
     5  long double sqrtl(long double x)
     6  {
     7  	__asm__ ("sqxbr %0, %1" : "=f"(x) : "f"(x));
     8  	return x;
     9  }
    10  
    11  #else
    12  
    13  #include "../sqrtl.c"
    14  
    15  #endif