2.9
[glibc/nacl-glibc.git] / sysdeps / x86_64 / fpu / e_remainderl.S
blob480b1cad8b0f16e555a30285b3dd45a0cf60f872
1 /*
2  * Written by J.T. Conklin <jtc@netbsd.org>.
3  * Public domain.
4  *
5  * Adapted for `long double' by Ulrich Drepper <drepper@cygnus.com>.
6  * Adapted for x86-64 by Andreas Jaeger <aj@suse.de>.
7  */
9 #include <machine/asm.h>
11 ENTRY(__ieee754_remainderl)
12         fldt    24(%rsp)
13         fldt    8(%rsp)
14 1:      fprem1
15         fstsw   %ax
16         testl   $0x400,%eax
17         jnz     1b
18         fstp    %st(1)
19         ret
20 END (__ieee754_remainderl)