fusl/src/math/x32/fmodl.s - mojo-tools - Git at Google

 .global fmodl
 .type fmodl,@function
 fmodl:
 	fldt 24(%esp)
 	fldt 8(%esp)
 1:	fprem
 	fnstsw %ax
 	testb $4,%ah
 	jnz 1b
 	fstp %st(1)
 	ret
	.global fmodl
	.type fmodl,@function
	fmodl:
	fldt 24(%esp)
	fldt 8(%esp)
	1: fprem
	fnstsw %ax
	testb $4,%ah
	jnz 1b
	fstp %st(1)
	ret