summaryrefslogtreecommitdiff
path: root/sysdeps/libm-i387/e_expl.S
diff options
context:
space:
mode:
Diffstat (limited to 'sysdeps/libm-i387/e_expl.S')
-rw-r--r--sysdeps/libm-i387/e_expl.S3
1 files changed, 2 insertions, 1 deletions
diff --git a/sysdeps/libm-i387/e_expl.S b/sysdeps/libm-i387/e_expl.S
index e83d30640d..2bcdf58c58 100644
--- a/sysdeps/libm-i387/e_expl.S
+++ b/sysdeps/libm-i387/e_expl.S
@@ -24,7 +24,7 @@ ENTRY(__ieee754_expl)
je 1f /* Is +-Inf, jump. */
fldl2e
fmulp /* x * log2(e) */
- fstl %st(1)
+ fld %st
frndint /* int(x * log2(e)) */
fsubr %st,%st(1) /* fract(x * log2(e)) */
fxch
@@ -37,6 +37,7 @@ ENTRY(__ieee754_expl)
1: testl $0x200, %eax /* Test sign. */
jz 2f /* If positive, jump. */
+ fstp %st
fldz /* Set result to 0. */
2: ret
END (__ieee754_expl)