diff options
| author | nsz <nsz@port70.net> | 2012-03-19 02:55:31 +0100 |
|---|---|---|
| committer | nsz <nsz@port70.net> | 2012-03-19 02:55:31 +0100 |
| commit | dbdec9722ee604969dddf51e81f8c9e4a9ce064a (patch) | |
| tree | 6806b3c8799e0907c0336b882c1dc1cad67c2bb7 /src/math/i386/expm1.s | |
| parent | 682e471400da612769b6e061f2e377db837274ef (diff) | |
| parent | 6f26cf3dacf9d426bbd18cecb4d486da56c17351 (diff) | |
| download | musl-dbdec9722ee604969dddf51e81f8c9e4a9ce064a.tar.gz | |
Merge branch 'master' of git://git.etalabs.net/musl
Diffstat (limited to 'src/math/i386/expm1.s')
| -rw-r--r-- | src/math/i386/expm1.s | 36 |
1 files changed, 36 insertions, 0 deletions
diff --git a/src/math/i386/expm1.s b/src/math/i386/expm1.s new file mode 100644 index 00000000..d6d511ef --- /dev/null +++ b/src/math/i386/expm1.s @@ -0,0 +1,36 @@ +.global expm1f +.type expm1f,@function +expm1f: + flds 4(%esp) + jmp 1f + +.global expm1l +.type expm1l,@function +expm1l: + fldt 4(%esp) + jmp 1f + +.global expm1 +.type expm1,@function +expm1: + fldl 4(%esp) +1: fldl2e + fmulp + fld %st(0) + frndint + fldz + fcompi + jnz 1f + fstp %st(0) + f2xm1 + ret +1: fxch %st(1) + fsub %st(1) + f2xm1 + fld1 + faddp + fscale + fld1 + fsubrp + fstp %st(1) + ret |