Convert ByteLoader to use CopARYBASE_set().
[p5sagit/p5-mst-13.2.git] / ext / ByteLoader / byterun.c
index 7a8d378..8c82798 100644 (file)
@@ -54,7 +54,7 @@ byterun(pTHX_ register struct byteloader_state *bstate)
     SV *specialsv_list[6];
 
     BYTECODE_HEADER_CHECK;     /* croak if incorrect platform */
-    New(666, bstate->bs_obj_list, 32, void*); /* set op objlist */
+    Newx(bstate->bs_obj_list, 32, void*); /* set op objlist */
     bstate->bs_obj_list_fill = 31;
     bstate->bs_obj_list[0] = NULL; /* first is always Null */
     bstate->bs_ix = 1;
@@ -524,7 +524,7 @@ byterun(pTHX_ register struct byteloader_state *bstate)
            {
                pvindex arg;
                BGET_pvindex(arg);
-               HvNAME(bstate->bs_sv) = arg;
+               BSET_xhv_name(bstate->bs_sv, arg);
                break;
            }
          case INSN_HV_STORE:           /* 67 */
@@ -964,7 +964,7 @@ byterun(pTHX_ register struct byteloader_state *bstate)
            {
                I32 arg;
                BGET_I32(arg);
-               cCOP->cop_arybase = arg;
+               BSET_cop_arybase(cCOP, arg);
                break;
            }
          case INSN_COP_LINE:           /* 129 */