1 /*
2  * Public domain.
3  *
4  */
5 
6 #include <math_private.h>
7 #include <libm-alias-finite.h>
8 
9 long double
__ieee754_atan2l(long double y,long double x)10 __ieee754_atan2l (long double y, long double x)
11 {
12   long double res;
13 
14   asm ("fpatan" : "=t" (res) : "u" (y), "0" (x) : "st(1)");
15 
16   return res;
17 }
18 libm_alias_finite (__ieee754_atan2l, __atan2l)
19