1 .global acosl 2 .type acosl,@function 3 acosl: 4 fldt 4(%esp) 5 fld %st(0) 6 fld1 7 fsub %st(0),%st(1) 8 fadd %st(2) 9 fmulp 10 fsqrt 11 fabs # fix sign of zero (matters in downward rounding mode) 12 fxch %st(1) 13 fpatan 14 ret 15