xref: /freebsd/lib/msun/i387/e_remainderf.S (revision 0afa8e065e14bb8fd338d75690e0238c00167d40)
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
20END(remainderf)
21
22	.section .note.GNU-stack,"",%progbits
23