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