Skip to content

Instantly share code, notes, and snippets.

@FROGGS
Created March 28, 2014 12:37
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save FROGGS/84550938a264ffd8b457 to your computer and use it in GitHub Desktop.
Save FROGGS/84550938a264ffd8b457 to your computer and use it in GitHub Desktop.
diff --git a/src/vm/moar/ops/perl6_ops.c b/src/vm/moar/ops/perl6_ops.c
index cc37e1b..f3c86ba 100644
--- a/src/vm/moar/ops/perl6_ops.c
+++ b/src/vm/moar/ops/perl6_ops.c
@@ -280,11 +280,11 @@ static MVMuint8 s_p6listitems[] = {
static void p6listitems(MVMThreadContext *tc) {
MVMObject *list = GET_REG(tc, 2).o;
if (MVM_6model_istype_cache_only(tc, list, List)) {
- MVMObject *items = ((Rakudo_List *)list)->items;
+ MVMObject *items = ((Rakudo_List *)MVMP6opaque_real_data(tc, OBJECT_BODY(list)))->items;
if (!items || !IS_CONCRETE(items) || REPR(items)->ID != MVM_REPR_ID_MVMArray) {
MVMROOT(tc, list, {
items = MVM_repr_alloc_init(tc, tc->instance->boot_types.BOOTArray);
- MVM_ASSIGN_REF(tc, &(list->header), ((Rakudo_List *)list)->items, items);
+ MVM_ASSIGN_REF(tc, &(list->header), ((Rakudo_List *)MVMP6opaque_real_data(tc, OBJECT_BODY(list)))->items, items);
});
}
GET_REG(tc, 0).o = items;
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment