]> CyberLeo.Net >> Repos - FreeBSD/releng/9.2.git/blob - lib/msun/i387/e_remainderf.S
- Copy stable/9 to releng/9.2 as part of the 9.2-RELEASE cycle.
[FreeBSD/releng/9.2.git] / lib / msun / i387 / e_remainderf.S
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
11 ENTRY(remainderf)
12         flds    8(%esp)
13         flds    4(%esp)
14 1:      fprem1
15         fstsw   %ax
16         sahf
17         jp      1b
18         fstp    %st(1)
19         ret
20 END(remainderf)
21
22         .section .note.GNU-stack,"",%progbits