fmodl.s raw

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