summaryrefslogtreecommitdiffstats
path: root/libc-top-half/musl/src/math/i386/atanf.s
diff options
context:
space:
mode:
Diffstat (limited to 'libc-top-half/musl/src/math/i386/atanf.s')
-rw-r--r--libc-top-half/musl/src/math/i386/atanf.s18
1 files changed, 18 insertions, 0 deletions
diff --git a/libc-top-half/musl/src/math/i386/atanf.s b/libc-top-half/musl/src/math/i386/atanf.s
new file mode 100644
index 0000000..c2cbe2e
--- /dev/null
+++ b/libc-top-half/musl/src/math/i386/atanf.s
@@ -0,0 +1,18 @@
+.global atanf
+.type atanf,@function
+atanf:
+ flds 4(%esp)
+ mov 4(%esp),%eax
+ add %eax,%eax
+ cmp $0x01000000,%eax
+ jb 1f
+ fld1
+ fpatan
+ fstps 4(%esp)
+ flds 4(%esp)
+ ret
+ # subnormal x, return x with underflow
+1: fld %st(0)
+ fmul %st(1)
+ fstps 4(%esp)
+ ret