/* * Generic 32-bit "/2addr" binary operation. Provide an "instr" * that specifies an instruction that performs "result = a0 op a1". * This could be an MIPS instruction or a function call. * * For: add-float/2addr, sub-float/2addr, mul-float/2addr, * div-float/2addr, rem-float/2addr */ /* binop/2addr vA, vB */ GET_OPA4(rOBJ) # t1 <- A+ GET_OPB(a3) # a3 <- B GET_VREG_F(fa0, rOBJ) GET_VREG_F(fa1, a3) FETCH_ADVANCE_INST(1) # advance rPC, load rINST $instr SET_VREG_F(fv0, rOBJ) # vAA <- result GET_INST_OPCODE(t0) # extract opcode from rINST GOTO_OPCODE(t0) # jump to next instruction