aboutsummaryrefslogtreecommitdiff
path: root/sysdeps/libm-i387/s_floor.S
diff options
context:
space:
mode:
Diffstat (limited to 'sysdeps/libm-i387/s_floor.S')
-rw-r--r--sysdeps/libm-i387/s_floor.S26
1 files changed, 14 insertions, 12 deletions
diff --git a/sysdeps/libm-i387/s_floor.S b/sysdeps/libm-i387/s_floor.S
index 561f83d98a..20a8660424 100644
--- a/sysdeps/libm-i387/s_floor.S
+++ b/sysdeps/libm-i387/s_floor.S
@@ -8,23 +8,25 @@
RCSID("$NetBSD: s_floor.S,v 1.4 1995/05/09 00:01:59 jtc Exp $")
ENTRY(__floor)
- pushl %ebp
- movl %esp,%ebp
+ fldl 4(%esp)
subl $8,%esp
- fstcw -4(%ebp) /* store fpu control word */
- movw -4(%ebp),%dx
- orw $0x0400,%dx /* round towards -oo */
- andw $0xf7ff,%dx
- movw %dx,-8(%ebp)
- fldcw -8(%ebp) /* load modified control word */
+ fstcw 4(%esp) /* store fpu control word */
- fldl 8(%ebp); /* round */
- frndint
+ /* We use here %edx although only the low 1 bits are defined.
+ But none of the operations should care and they are faster
+ than the 16 bit operations. */
+ movl $0x400,%edx /* round towards -oo */
+ orl 4(%esp),%edx
+ andl $0xf7ff,%edx
+ movl %edx,(%esp)
+ fldcw (%esp) /* load modified control word */
- fldcw -4(%ebp) /* restore original control word */
+ frndint /* round */
- leave
+ fldcw 4(%esp) /* restore original control word */
+
+ addl $8,%esp
ret
END (__floor)
weak_alias (__floor, floor)