diff options
Diffstat (limited to 'REORG.TODO/sysdeps/x86_64/fpu/s_floorl.S')
-rw-r--r-- | REORG.TODO/sysdeps/x86_64/fpu/s_floorl.S | 35 |
1 files changed, 35 insertions, 0 deletions
diff --git a/REORG.TODO/sysdeps/x86_64/fpu/s_floorl.S b/REORG.TODO/sysdeps/x86_64/fpu/s_floorl.S new file mode 100644 index 0000000000..535fdd8571 --- /dev/null +++ b/REORG.TODO/sysdeps/x86_64/fpu/s_floorl.S @@ -0,0 +1,35 @@ +/* + * Written by J.T. Conklin <jtc@netbsd.org>. + * Changes for long double by Ulrich Drepper <drepper@cygnus.com> + * Changes for x86-64 by Andreas Jaeger <aj@suse.de>=09 + * Public domain. + */ + +#include <machine/asm.h> + +ENTRY(__floorl) + fldt 8(%rsp) + + fnstenv -28(%rsp) /* 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 -28(%rsp),%edx + andl $0xf7ff,%edx + movl %edx,-32(%rsp) + fldcw -32(%rsp) /* load modified control word */ + + frndint /* round */ + + /* Preserve "invalid" exceptions from sNaN input. */ + fnstsw + andl $0x1, %eax + orl %eax, -24(%rsp) + + fldenv -28(%rsp) /* restore original environment */ + + ret +END (__floorl) +weak_alias (__floorl, floorl) |