mirror of https://git.musl-libc.org/git/musl
6 changed files with 75 additions and 42 deletions
@ -1 +1,16 @@ |
|||
# see acos.s |
|||
.global acosf |
|||
.type acosf,@function |
|||
acosf: |
|||
flds 4(%esp) |
|||
fld %st(0) |
|||
fld1 |
|||
fsub %st(0),%st(1) |
|||
fadd %st(2) |
|||
fmulp |
|||
fsqrt |
|||
fabs # fix sign of zero (matters in downward rounding mode) |
|||
fxch %st(1) |
|||
fpatan |
|||
fstps 4(%esp) |
|||
flds 4(%esp) |
|||
ret |
|||
|
|||
@ -1 +1,14 @@ |
|||
# see acos.s |
|||
.global acosl |
|||
.type acosl,@function |
|||
acosl: |
|||
fldt 4(%esp) |
|||
fld %st(0) |
|||
fld1 |
|||
fsub %st(0),%st(1) |
|||
fadd %st(2) |
|||
fmulp |
|||
fsqrt |
|||
fabs # fix sign of zero (matters in downward rounding mode) |
|||
fxch %st(1) |
|||
fpatan |
|||
ret |
|||
|
|||
@ -1 +1,23 @@ |
|||
# see asin.s |
|||
.global asinf |
|||
.type asinf,@function |
|||
asinf: |
|||
flds 4(%esp) |
|||
mov 4(%esp),%eax |
|||
add %eax,%eax |
|||
cmp $0x01000000,%eax |
|||
jb 1f |
|||
fld %st(0) |
|||
fld1 |
|||
fsub %st(0),%st(1) |
|||
fadd %st(2) |
|||
fmulp |
|||
fsqrt |
|||
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 |
|||
|
|||
@ -1 +1,12 @@ |
|||
# see asin.s |
|||
.global asinl |
|||
.type asinl,@function |
|||
asinl: |
|||
fldt 4(%esp) |
|||
fld %st(0) |
|||
fld1 |
|||
fsub %st(0),%st(1) |
|||
fadd %st(2) |
|||
fmulp |
|||
fsqrt |
|||
fpatan |
|||
ret |
|||
|
|||
Loading…
Reference in new issue