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 | */ |
8 | |
9 | #include <machine/asm.h> |
10 | #include <libm-alias-finite.h> |
11 | |
12 | ENTRY(__ieee754_remainderl) |
13 | fldt 24(%rsp) |
14 | fldt 8(%rsp) |
15 | 1: fprem1 |
16 | fstsw %ax |
17 | testl $0x400,%eax |
18 | jnz 1b |
19 | fstp %st(1) |
20 | ret |
21 | END (__ieee754_remainderl) |
22 | libm_alias_finite (__ieee754_remainderl, __remainderl) |
23 |