Updated to fedora-glibc-20050912T0656
[glibc/history.git] / sysdeps / i386 / fpu / e_fmod.S
blob4cf6e9205464a01a65ded93e216f6cffb467b0f3
1 /*
2  * Written by J.T. Conklin <jtc@netbsd.org>.
3  * Public domain.
4  */
6 #include <machine/asm.h>
8 RCSID("$NetBSD: e_fmod.S,v 1.4 1995/05/08 23:47:56 jtc Exp $")
10 ENTRY(__ieee754_fmod)
11         fldl    12(%esp)
12         fldl    4(%esp)
13 1:      fprem
14         fstsw   %ax
15         sahf
16         jp      1b
17         fstp    %st(1)
18         ret
19 END (__ieee754_fmod)