projects / musl / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
history | raw | HEAD
asm for modf functions
[musl] / src / math / i386 / modfl.s
1 .global modfl
2 .type modfl,@function
3 modfl:
4         mov 16(%esp),%eax
5         fldt 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         fstpt (%eax)
15         ret
musl