Merge remote-tracking branch 'nsz/master'

This commit is contained in:
Rich Felker
2012-05-04 20:56:01 -04:00
2 changed files with 18 additions and 22 deletions

View File

@ -1,3 +1,5 @@
# use acos(x) = atan2(fabs(sqrt((1-x)*(1+x))), x)
.global acosf
.type acosf,@function
acosf:
@ -14,17 +16,13 @@ acosl:
.type acos,@function
acos:
fldl 4(%esp)
1: fld1
fld %st(1)
1: fld %st(0)
fld1
fsubp
fsqrt
fxch %st(2)
faddp
fsqrt
fpatan
fld1
fld1
faddp
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

View File

@ -1,18 +1,16 @@
# see ../i386/acos.s
.global acosl
.type acosl,@function
acosl:
fldt 8(%rsp)
1: fld %st(0)
fld1
fld %st(1)
fld1
fsubp
fsqrt
fxch %st(2)
faddp
fsqrt
fpatan
fld1
fld1
faddp
fsub %st(0),%st(1)
fadd %st(2)
fmulp
fsqrt
fabs
fxch %st(1)
fpatan
ret