c9408a9088d076e8a12618b3eeb2d32612d315ff
[oweals/musl.git] / src / math / i386 / atan2f.s
1 .global atan2f
2 .type atan2f,@function
3 atan2f:
4         flds 4(%esp)
5         flds 8(%esp)
6         fpatan
7         fsts 4(%esp)
8         mov 4(%esp),%eax
9         add %eax,%eax
10         cmp $0x01000000,%eax
11         jae 1f
12                 # subnormal x, return x with underflow
13         fld %st(0)
14         fmul %st(1)
15         fstps 4(%esp)
16 1:      ret