1 %default { "is_object":"0" } 2 /* for: move/16, move-object/16 */ 3 /* op vAAAA, vBBBB */ 4 FETCH r1, 2 @ r1<- BBBB 5 FETCH r0, 1 @ r0<- AAAA 6 FETCH_ADVANCE_INST 3 @ advance rPC, load rINST 7 GET_VREG r2, r1 @ r2<- fp[BBBB] 8 GET_INST_OPCODE ip @ extract opcode from rINST 9 .if $is_object 10 SET_VREG_OBJECT r2, r0 @ fp[AAAA]<- r2 11 .else 12 SET_VREG r2, r0 @ fp[AAAA]<- r2 13 .endif 14 GOTO_OPCODE ip @ jump to next instruction 15
