1*f504f610SAugustin Cavalier.global remainderl 2*f504f610SAugustin Cavalier.type remainderl,@function 3*f504f610SAugustin Cavalierremainderl: 4*f504f610SAugustin Cavalier fldt 24(%rsp) 5*f504f610SAugustin Cavalier fldt 8(%rsp) 6*f504f610SAugustin Cavalier1: fprem1 7*f504f610SAugustin Cavalier fnstsw %ax 8*f504f610SAugustin Cavalier testb $4,%ah 9*f504f610SAugustin Cavalier jnz 1b 10*f504f610SAugustin Cavalier fstp %st(1) 11*f504f610SAugustin Cavalier ret 12