1 /* 2 * Generic 32-bit binary float operation. 3 * 4 * For: add-fp, sub-fp, mul-fp, div-fp 5 */ 6 7 /* binop/2addr vA, vB */ 8 movzx rINSTbl,%ecx # ecx<- A+ 9 andb $$0xf,%cl # ecx<- A 10 $load (rFP,%ecx,4) # vAA to fp stack 11 sarl $$4,rINST # rINST<- B 12 $instr (rFP,rINST,4) # ex: faddp 13 FETCH_INST_OPCODE 1 %eax 14 ADVANCE_PC 1 15 $store (rFP,%ecx,4) # %st to vA 16 GOTO_NEXT_R %eax 17