Ticket #757: TRAC-757-3.patch

src/pmc/parrotinterpreter.pmc

@@ -90 +90 @@
                 PObj_is_class_TEST(s->vtables[i]->pmc_class)) {
                 STRING * const class_name =
                     VTABLE_get_string(s, s->vtables[i]->pmc_class);
-                PARROT_ASSERT(VTABLE_exists_keyed_str(d,
-                    d->class_hash, class_name));
-
-                VTABLE_delete_keyed_str(d, d->class_hash, class_name);
-
-                if (last_remove == i + 1) {
-                    --d->n_vtable_max;
-                    last_remove = i;
-                }
+                if (VTABLE_exists_keyed_str(d, d->class_hash, class_name)){
+                     VTABLE_delete_keyed_str(d, d->class_hash, class_name);
+                     
+                     if (last_remove == i + 1) {
+                          --d->n_vtable_max;
+                          last_remove = i;
+                     }
+                }
             }
         }
+        d->n_vtable_max = start; // prevent hole between start and s->vtablemax
     }
 
     if (flags & PARROT_CLONE_LIBRARIES) {