fusl/src/math/i386/fmodf.s - mojo - Git at Google

 .global fmodf
 .type fmodf,@function
 fmodf:
 	flds 8(%esp)
 	flds 4(%esp)
 1:	fprem
 	fnstsw %ax
 	sahf
 	jp 1b
 	fstp %st(1)
 	ret
	.global fmodf
	.type fmodf,@function
	fmodf:
	flds 8(%esp)
	flds 4(%esp)
	1: fprem
	fnstsw %ax
	sahf
	jp 1b
	fstp %st(1)
	ret