1/*
2 * Public domain.
3 *
4 */
5
6#include <machine/asm.h>
7#include <libm-alias-finite.h>
8
9ENTRY(__ieee754_remainderl)
10	fldt	16(%esp)
11	fldt	4(%esp)
121:	fprem1
13	fstsw	%ax
14	sahf
15	jp	1b
16	fstp	%st(1)
17	ret
18END (__ieee754_remainderl)
19libm_alias_finite (__ieee754_remainderl, __remainderl)
20