This fixes a rather obvious and silly oversight in my patch. Luke
Index: src/register.c =================================================================== RCS file: /cvs/public/parrot/src/register.c,v retrieving revision 1.35 diff -u -r1.35 register.c --- src/register.c 12 Jan 2004 09:50:26 -0000 1.35 +++ src/register.c 12 Jan 2004 19:54:36 -0000 @@ -107,7 +107,8 @@ struct RegisterChunkBuf* buf = new_bufferlike_header(interpreter, sizeof(struct RegisterChunkBuf)); *buf = *chunk; - + PObj_COW_CLEAR((PObj*)buf); + Parrot_block_DOD(interpreter); Parrot_allocate_zeroed(interpreter, (PObj*)buf, stack->chunk_size); Parrot_unblock_DOD(interpreter);