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

   1 .global modff
   2 .type modff,@function
   3 modff:
   4         mov 8(%esp),%eax
   5         flds 4(%esp)
   6         fld1
   7         fld %st(1)
   8 1:      fprem
   9         fstsw %ax
  10         sahf
  11         jp 1b
  12         fstp %st(1)
  13         fsubr %st(1)
  14         fstps (%eax)
  15         ret