[svn:parrot] r49392 - in branches/generational_gc/src: . pmc

[bacek at svn.parrot.org]

Author: bacek
Date: Thu Sep 30 23:37:17 2010
New Revision: 49392
URL: https://trac.parrot.org/parrot/changeset/49392

Log:
Properly initialize and clone wb_variant_vtable.

Modified:
   branches/generational_gc/src/pmc.c
   branches/generational_gc/src/pmc/class.pmc

Modified: branches/generational_gc/src/pmc.c
==============================================================================
--- branches/generational_gc/src/pmc.c	Thu Sep 30 20:29:40 2010	(r49391)
+++ branches/generational_gc/src/pmc.c	Thu Sep 30 23:37:17 2010	(r49392)
@@ -889,6 +889,8 @@
 
     if (vtable->ro_variant_vtable)
         vtable->ro_variant_vtable->mro = mro;
+    if (vtable->wb_variant_vtable)
+        vtable->wb_variant_vtable->mro = mro;
 
     count = VTABLE_elements(interp, mro_list);
 

Modified: branches/generational_gc/src/pmc/class.pmc
==============================================================================
--- branches/generational_gc/src/pmc/class.pmc	Thu Sep 30 20:29:40 2010	(r49391)
+++ branches/generational_gc/src/pmc/class.pmc	Thu Sep 30 23:37:17 2010	(r49392)
@@ -346,6 +346,8 @@
         new_vtable->mro               = _class->all_parents;
         new_vtable->ro_variant_vtable =
                 Parrot_clone_vtable(interp, self->vtable->ro_variant_vtable);
+        new_vtable->wb_variant_vtable =
+                Parrot_clone_vtable(interp, self->vtable->wb_variant_vtable);
 
         /* Store the class's vtable in the global table */
         interp->vtables[type_num]     = new_vtable;