1.global remainderl
 2.type remainderl,@function
 3remainderl:
 4	fldt 24(%esp)
 5	fldt 8(%esp)
 61:	fprem1
 7	fnstsw %ax
 8	testb $4,%ah
 9	jnz 1b
10	fstp %st(1)
11	ret