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.126 2000/08/23 18:49:45 grubba Exp $"); + RCSID("$Id: gc.c,v 1.127 2000/08/27 15:21:50 mast 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:614:    int t,    int indent,    int depth,    int flags)   {    struct program *p=(struct program *)a;    struct marker *m;       if(depth<0) return;    -  if ((m = find_marker(a))) { +  if (Pike_in_gc && (m = find_marker(a))) {    fprintf(stderr,"%*s**Got gc ",indent,"");    describe_marker(m);    }       switch(t)    {    case T_FUNCTION:    if(attempt_to_identify(a) != T_OBJECT)    {    fprintf(stderr,"%*s**Builtin function!\n",indent,"");