diff options
Diffstat (limited to 'REORG.TODO/sysdeps/i386/fpu/s_floorl.S')
| -rw-r--r-- | REORG.TODO/sysdeps/i386/fpu/s_floorl.S | 40 |
1 files changed, 40 insertions, 0 deletions
diff --git a/REORG.TODO/sysdeps/i386/fpu/s_floorl.S b/REORG.TODO/sysdeps/i386/fpu/s_floorl.S new file mode 100644 index 0000000000..dc74a0c446 --- /dev/null +++ b/REORG.TODO/sysdeps/i386/fpu/s_floorl.S @@ -0,0 +1,40 @@ +/* + * Written by J.T. Conklin <jtc@netbsd.org>. + * Changes for long double by Ulrich Drepper <drepper@cygnus.com> + * Public domain. + */ + +#include <machine/asm.h> + +RCSID("$NetBSD: $") + +ENTRY(__floorl) + fldt 4(%esp) + subl $32,%esp + cfi_adjust_cfa_offset (32) + + fnstenv 4(%esp) /* store fpu environment */ + + /* 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 */ + + frndint /* round */ + + /* Preserve "invalid" exceptions from sNaN input. */ + fnstsw + andl $0x1, %eax + orl %eax, 8(%esp) + + fldenv 4(%esp) /* restore original environment */ + + addl $32,%esp + cfi_adjust_cfa_offset (-32) + ret +END (__floorl) +weak_alias (__floorl, floorl) |