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.163 2001/07/01 21:05:08 mast Exp $"); + RCSID("$Id: gc.c,v 1.164 2001/07/01 23:44:40 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:1759:    CYCLE_DEBUG_MSG(m, "gc_cycle_push, search strong");    for (p = NEXT(m->frame);; p = NEXT(p)) {    CHECK_POP_FRAME(p);    if (p->frameflags & GC_WEAK_REF) weak_ref = p;    if (!(p->frameflags & GC_STRONG_REF)) nonstrong_ref = p;    if (p == gc_rec_last) break;    }   #ifdef PIKE_DEBUG    if (p == gc_rec_last && !nonstrong_ref) {    fprintf(stderr, "Only strong links in cycle:\n"); -  for (p = NEXT(m->frame);; p = NEXT(p)) { +  for (p = m->frame;; p = NEXT(p)) {    describe(p->data);    locate_references(p->data);    if (p == gc_rec_last) break;    fprintf(stderr, "========= next =========\n");    }    gc_fatal(0, 0, "Only strong links in cycle.\n");    }   #endif    }