sweep 0 was making parrot segfault for me. The patch explains why.
Luke
Index: src/dod.c
===================================================================
RCS file: /cvs/public/parrot/src/dod.c,v
retrieving revision 1.81
diff -u -r1.81 dod.c
--- src/dod.c 10 Jan 2004 19:43:06 -0000 1.81
+++ src/dod.c 11 Jan 2004 06:17:18 -0000
@@ -735,12 +735,11 @@
static void
clear_live_bits(Parrot_Interp interpreter)
{
- struct Small_Object_Pool *pool;
+ struct Small_Object_Pool *pool = interpreter->arena_base->pmc_pool;
struct Small_Object_Arena *arena;
UINTVAL i;
UINTVAL object_size = pool->object_size;
- pool = interpreter->arena_base->pmc_pool;
/* Run through all the buffer header pools and mark */
for (arena = pool->last_Arena; arena; arena = arena->prev) {
#if ARENA_DOD_FLAGS
