Branch: Tag:

2002-09-30

2002-09-30 12:45:56 by Marcus Comstedt <marcus@mc.pp.se>

New block allocator which can free blocks.

Rev: src/block_alloc.h:1.42
Rev: src/las.c:1.299
Rev: src/program.c:1.446

5:   \*/   /**/   #include "global.h" - RCSID("$Id: program.c,v 1.445 2002/09/30 12:43:59 marcus Exp $"); + RCSID("$Id: program.c,v 1.446 2002/09/30 12:45:56 marcus Exp $");   #include "program.h"   #include "object.h"   #include "dynamic_buffer.h"
1642:    }       Pike_compiler->malloc_size_program = ALLOC_STRUCT(program); - #ifdef PIKE_DEBUG +     Pike_compiler->fake_object=alloc_object(); -  + #ifdef PIKE_DEBUG    Pike_compiler->fake_object->storage=(char *)xalloc(256 * sizeof(struct svalue));    /* Stipple to find illegal accesses */    MEMSET(Pike_compiler->fake_object->storage,0x55,256*sizeof(struct svalue));   #else -  Pike_compiler->fake_object=ALLOC_STRUCT(object); +     Pike_compiler->fake_object->storage=(char *)malloc(sizeof(struct parent_info));   #endif    /* Can't use GC_ALLOC on fake objects, but still it's good to know