xref: /freebsd/lib/msun/i387/e_fmodf.S (revision 1d386b48a555f61cb7325543adbbb5c3f3407a66)
183e449a4SBruce Evans/*
2*f776d19fSBruce Evans * Written by J.T. Conklin <jtc@netbsd.org>.
383e449a4SBruce Evans * Public domain.
483e449a4SBruce Evans */
583e449a4SBruce Evans
683e449a4SBruce Evans#include <machine/asm.h>
783e449a4SBruce EvansENTRY(fmodf)
8*f776d19fSBruce Evans	flds	8(%esp)
9*f776d19fSBruce Evans	flds	4(%esp)
1083e449a4SBruce Evans1:	fprem
1183e449a4SBruce Evans	fstsw	%ax
12*f776d19fSBruce Evans	sahf
13*f776d19fSBruce Evans	jp	1b
14*f776d19fSBruce Evans	fstp	%st(1)
1583e449a4SBruce Evans	ret
1683e449a4SBruce EvansEND(fmodf)
1783e449a4SBruce Evans
1883e449a4SBruce Evans	.section .note.GNU-stack,"",%progbits
19