initial commit
[glibc.git] / sysdeps / i386 / fpu / s_atanl.c
1 /*
2 * Public domain.
3 *
4 */
5
6 #include <libm-alias-ldouble.h>
7
8 long double
9 __atanl (long double x)
10 {
11 long double res;
12
13 asm ("fld1\n"
14 "fpatan"
15 : "=t" (res) : "0" (x));
16
17 return res;
18 }
19
20 libm_alias_ldouble (__atan, atan)