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
11ENTRY(__ieee754_remainderl)
12 fldt 24(%rsp)
13 fldt 8(%rsp)
141: fprem1
15 fstsw %ax
16 testl $0x400,%eax
17 jnz 1b
18 fstp %st(1)
19 ret
20END (__ieee754_remainderl)
21strong_alias (__ieee754_remainderl, __remainderl_finite)
22