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