Guest User

Untitled

a guest
Oct 16th, 2018
76
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.81 KB | None | 0 0
  1. diff --git a/src/pmc/qrpa.pmc b/src/pmc/qrpa.pmc
  2. index 9aa98d3..77483a5 100644
  3. --- a/src/pmc/qrpa.pmc
  4. +++ b/src/pmc/qrpa.pmc
  5. @@ -206,11 +206,11 @@ Resizes the array to C<n> elements.
  6.  
  7.  
  8. VTABLE PMC * get_pmc_keyed_int(INTVAL pos) {
  9. - INTVAL elems;
  10. - INTVAL start;
  11. - PMC **slots;
  12. + Parrot_QRPA_attributes *attrs = PARROT_QRPA(SELF);
  13. + INTVAL elems = attrs->elems;
  14. + INTVAL start = attrs->start;
  15. + PMC **slots = attrs->slots;
  16.  
  17. - GET_ATTR_elems(INTERP, SELF, elems);
  18. if (pos < 0)
  19. pos += elems;
  20.  
  21. @@ -221,8 +221,6 @@ Resizes the array to C<n> elements.
  22. if (pos >= elems)
  23. return PMCNULL;
  24.  
  25. - GET_ATTR_start(INTERP, SELF, start);
  26. - GET_ATTR_slots(INTERP, SELF, slots);
  27. return slots[start + pos];
  28. }
Add Comment
Please, Sign In to add comment