pike.git / src / gc.c

version» Context lines:

pike.git/src/gc.c:23:   #include "constants.h"   #include "interpret.h"   #include "bignum.h"      #include "gc.h"   #include "main.h"   #include <math.h>      #include "block_alloc.h"    - RCSID("$Id: gc.c,v 1.155 2001/06/27 02:06:41 hubbe Exp $"); + RCSID("$Id: gc.c,v 1.156 2001/06/28 10:24:21 hubbe Exp $");      /* Run garbage collect approximately every time    * 20 percent of all arrays, objects and programs is    * garbage.    */      #define GC_CONST 20   #define MIN_ALLOC_THRESHOLD 1000   #define MAX_ALLOC_THRESHOLD 10000000   #define MULTIPLIER 0.9
pike.git/src/gc.c:683:    if (p) {    fprintf(stderr,"%*s**Attempting to describe program object was instantiated from:\n",indent,"");   #ifdef DEBUG_MALLOC    if ((int) p == 0x55555555)    fprintf(stderr, "%*s**Zapped program pointer.\n", indent, "");    else   #endif    low_describe_something(p, T_PROGRAM, indent, depth, flags);    }    -  if(p && (p->flags & PROGRAM_USES_PARENT) && -  PARENT_INFO(((struct object *)a))->parent) +  if(p && +  (p->flags & PROGRAM_USES_PARENT) && +  LOW_PARENT_INFO(((struct object *)a),p)->parent)    {    fprintf(stderr,"%*s**Describing object's parent:\n",indent,"");    describe_something( PARENT_INFO((struct object *)a)->parent, t, indent+2,depth-1,    (flags | DESCRIBE_SHORT | DESCRIBE_NO_REFS )    & ~ (DESCRIBE_MEM));    }else{    fprintf(stderr,"%*s**There is no parent (any longer?)\n",indent,"");    }    break;