diff options
Diffstat (limited to 'sysdeps/libm-i387/s_remquol.S')
| -rw-r--r-- | sysdeps/libm-i387/s_remquol.S | 31 |
1 files changed, 31 insertions, 0 deletions
diff --git a/sysdeps/libm-i387/s_remquol.S b/sysdeps/libm-i387/s_remquol.S new file mode 100644 index 0000000000..9c91d90c45 --- /dev/null +++ b/sysdeps/libm-i387/s_remquol.S @@ -0,0 +1,31 @@ +/* + * Written by Ulrich Drepper <drepper@cygnus.com>. + * Based on e_remainder by J.T. Conklin <jtc@netbsd.org>. + * Public domain. + */ + +#include <machine/asm.h> + +ENTRY(__remquol) + fldt 16(%esp) + fldt 4(%esp) +1: fprem1 + fstsw %ax + sahf + jp 1b + fstpl %st(1) + /* Compute the congruent of the quotient. */ + movl %eax, %ecx + shrl $8, %eax + shrl $12, %ecx + andl $4, %ecx + andl $3, %eax + orl %eax, %ecx + movl $0xef2960, %eax + shrl %cl, %eax + andl $3, %eax + movl 28(%esp), %ecx + movl %eax, (%ecx) + ret +END (__remquol) +weak_alias (__remquol, remquol) |