I've just commited the appended fix, which should hopefully reduce the number of failures in the Tinderbox.
Simon --- interpreter.c.old Sat Dec 14 18:26:45 2002 +++ interpreter.c Sat Dec 14 18:44:49 2002 @@ -591,7 +591,7 @@ Parrot_really_destroy(int exit_code, voi chunks[1] = interpreter->ctx.user_stack; chunks[2] = interpreter->ctx.control_stack; for (i = 0; i< 3; i++) { - Stack_Chunk_t *top = chunks[0]; + Stack_Chunk_t *top = chunks[i]; while (top->next) top = top->next; while(top) {