]> CyberLeo.Net >> Repos - FreeBSD/releng/10.0.git/blob - lib/msun/amd64/e_remainderf.S
- Copy stable/10 (r259064) to releng/10.0 as part of the
[FreeBSD/releng/10.0.git] / lib / msun / amd64 / e_remainderf.S
1 /*
2  * Based on the i387 version written by J.T. Conklin <jtc@netbsd.org>.
3  * Public domain.
4  */
5
6 #include <machine/asm.h>
7
8 RCSID("from: $NetBSD: e_remainderf.S,v 1.2 1995/05/08 23:49:47 jtc Exp $")
9 __FBSDID("$FreeBSD$")
10
11 ENTRY(remainderf)
12         movss   %xmm0,-4(%rsp)
13         movss   %xmm1,-8(%rsp)
14         flds    -8(%rsp)
15         flds    -4(%rsp)
16 1:      fprem1
17         fstsw   %ax
18         testw   $0x400,%ax
19         jne     1b
20         fstps   -4(%rsp)
21         movss   -4(%rsp),%xmm0
22         fstp    %st
23         ret
24
25         .section .note.GNU-stack,"",%progbits