pike.git / src / gc.c

version» Context lines:

pike.git/src/gc.c:22:   #include "time_stuff.h"   #include "constants.h"   #include "interpret.h"      #include "gc.h"   #include "main.h"   #include <math.h>      #include "block_alloc.h"    - RCSID("$Id: gc.c,v 1.113 2000/08/10 09:23:35 grubba Exp $"); + RCSID("$Id: gc.c,v 1.114 2000/08/10 09:25:44 grubba 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:684:    fprintf(stderr,"%*s**identifiers:\n",indent,"");    for(e=0;e<p->num_identifier_references;e++)    fprintf(stderr,"%*s**** %s\n",indent,"",ID_FROM_INT(p,e)->name->str);       fprintf(stderr,"%*s**num inherits: %d\n",indent,"",p->num_inherits);    }       if(flags & DESCRIBE_MEM)    {   #define FOO(NUMTYPE,TYPE,NAME) \ -  fprintf(stderr,"%*s* " #NAME " %p[%d]\n",indent,"",p->NAME,p->PIKE_CONCAT(num_,NAME)); +  fprintf(stderr, "%*s* " #NAME " %p[%ld]\n", \ +  indent, "", p->NAME, (long)p->PIKE_CONCAT(num_,NAME));   #include "program_areas.h"    }       break;    }       case T_MULTISET:    fprintf(stderr,"%*s**Describing array of multiset:\n",indent,"");    debug_dump_array(((struct multiset *)a)->ind);    break;