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
12