/* | |
* Generic 32-bit binary float operation. | |
* | |
* For: add-fp, sub-fp, mul-fp, div-fp | |
*/ | |
/* binop/2addr vA, vB */ | |
movzx rINSTbl,%ecx # ecx<- A+ | |
andb $$0xf,%cl # ecx<- A | |
$load (rFP,%ecx,4) # vAA to fp stack | |
sarl $$4,rINST # rINST<- B | |
$instr (rFP,rINST,4) # ex: faddp | |
FETCH_INST_OPCODE 1 %eax | |
ADVANCE_PC 1 | |
$store (rFP,%ecx,4) # %st to vA | |
GOTO_NEXT_R %eax |