xref: /freebsd/lib/msun/i387/e_remainderf.S (revision db33c6f3ae9d1231087710068ee4ea5398aacca7)
1/*
2 * Written by J.T. Conklin <jtc@netbsd.org>.
3 * Public domain.
4 */
5
6#include <machine/asm.h>
7/* RCSID("$NetBSD: e_remainderf.S,v 1.2 1995/05/08 23:49:47 jtc Exp $") */
8
9ENTRY(remainderf)
10	flds	8(%esp)
11	flds	4(%esp)
121:	fprem1
13	fstsw	%ax
14	sahf
15	jp	1b
16	fstp	%st(1)
17	ret
18END(remainderf)
19
20	.section .note.GNU-stack,"",%progbits
21