[svn:parrot] r49527 - branches/generational_gc/src/gc
bacek at svn.parrot.org
bacek at svn.parrot.org
Wed Oct 13 12:31:34 UTC 2010
Author: bacek
Date: Wed Oct 13 12:31:34 2010
New Revision: 49527
URL: https://trac.parrot.org/parrot/changeset/49527
Log:
Fix copy-paste bug in marking oldest generation.
Modified:
branches/generational_gc/src/gc/gc_ms2.c
Modified: branches/generational_gc/src/gc/gc_ms2.c
==============================================================================
--- branches/generational_gc/src/gc/gc_ms2.c Wed Oct 13 12:03:36 2010 (r49526)
+++ branches/generational_gc/src/gc/gc_ms2.c Wed Oct 13 12:31:34 2010 (r49527)
@@ -744,7 +744,7 @@
if (PObj_live_TEST(pmc)) {
gc_ms2_seal_object(interp, pmc);
- gc_ms2_set_gen_flags(interp, pmc, i+1);
+ gc_ms2_set_gen_flags(interp, pmc, 2);
}
tmp = next;
@@ -1381,7 +1381,7 @@
pmc->flags &= ~(PObj_GC_generation_0_FLAG
| PObj_GC_generation_1_FLAG
| PObj_GC_generation_2_FLAG);
- pmc->flags |= generation_to_flags(self->current_generation);
+ pmc->flags |= gen2flags(self->current_generation);
pmc->flags |= PObj_GC_generation_2_FLAG;
}
@@ -1408,7 +1408,7 @@
s->flags &= ~(PObj_GC_generation_0_FLAG
| PObj_GC_generation_1_FLAG
| PObj_GC_generation_2_FLAG);
- s->flags |= generation_to_flags(self->current_generation);
+ s->flags |= gen2flags(self->current_generation);
}
/*
=item C<static void gc_ms2_sweep_pool(PARROT_INTERP, Pool_Allocator *pool,
@@ -1867,7 +1867,7 @@
obj->flags &= ~(PObj_GC_generation_0_FLAG
| PObj_GC_generation_1_FLAG
| PObj_GC_generation_2_FLAG);
- obj->flags |= generation_to_flags(gen);
+ obj->flags |= gen2flags(gen);
}
/*
More information about the parrot-commits
mailing list