Home | History | Annotate | Download | only in mips
      1 %default {"load":"LOAD64_F(fa0, fa0f, a3)"}
      2     /*
      3      * Generic 64bit-to-32bit floating-point unary operation.  Provide an "instr"
      4      * line that specifies an instruction that performs "fv0 = op fa0".
      5      *
      6      * For: double-to-float
      7      */
      8     /* unop vA, vB */
      9     GET_OPB(a3)                            #  a3 <- B
     10     GET_OPA4(rOBJ)                         #  rOBJ <- A+
     11     EAS2(a3, rFP, a3)                      #  a3 <- &fp[B]
     12     $load
     13     FETCH_ADVANCE_INST(1)                  #  advance rPC, load rINST
     14     $instr
     15     GET_INST_OPCODE(t0)                    #  extract opcode from rINST
     16     SET_VREG_F_GOTO(fv0, rOBJ, t0)         #  vA <- fv0
     17