nsz Git - musl/blob - src/math/i386/atanf.s

   1 .global atanf
   2 .type atanf,@function
   3 atanf:
   4         flds 4(%esp)
   5         mov 4(%esp),%eax
   6         add %eax,%eax
   7         cmp $0x01000000,%eax
   8         jb 1f
   9         fld1
  10         fpatan
  11         ret
  12                 # subnormal x, return x with underflow
  13 1:      fld %st(0)
  14         fmul %st(1)
  15         fstps 4(%esp)
  16         ret