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.100 2000/07/03 18:38:26 mast Exp $"); + RCSID("$Id: gc.c,v 1.101 2000/07/04 00:43:57 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:446:      void debug_gc_xmark_svalues(struct svalue *s, int num, char *fromwhere)   {    found_in=(void *)fromwhere;    found_in_type=-1;    gc_xmark_svalues(s,num);    found_in_type=T_UNKNOWN;    found_in=0;   }    - TYPE_FIELD debug_gc_check_svalues(struct svalue *s, int num, TYPE_T t, void *data) + void debug_gc_check_svalues(struct svalue *s, int num, TYPE_T t, void *data)   { -  TYPE_FIELD ret; +     found_in=data;    found_in_type=t; -  ret=gc_check_svalues(s,num); +  gc_check_svalues(s,num);    found_in_type=T_UNKNOWN;    found_in=0; -  return ret; +    }    - TYPE_FIELD debug_gc_check_weak_svalues(struct svalue *s, int num, TYPE_T t, void *data) + void debug_gc_check_weak_svalues(struct svalue *s, int num, TYPE_T t, void *data)   { -  TYPE_FIELD ret; +     found_in=data;    found_in_type=t; -  ret=gc_check_weak_svalues(s,num); +  gc_check_weak_svalues(s,num);    found_in_type=T_UNKNOWN;    found_in=0; -  return ret; +    }      void debug_gc_check_short_svalue(union anything *u, TYPE_T type, TYPE_T t, void *data)   {    found_in=data;    found_in_type=t;    gc_check_short_svalue(u,type);    found_in_type=T_UNKNOWN;    found_in=0;   }