/* * Generic 32-bit "/2addr" binary operation. Provide an "instr" * that specifies an instruction that performs "fv0 = fa0 op fa1". * 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) # rOBJ <- 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 GET_INST_OPCODE(t0) # extract opcode from rINST SET_VREG_F_GOTO(fv0, rOBJ, t0) # vA <- result