Branch: Tag:

2001-07-01

2001-07-01 23:44:40 by Martin Stjernholm <mast@lysator.liu.se>

Fixed a debug report message.

Rev: src/gc.c:1.164

30:      #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
1766: Inside #if defined(PIKE_DEBUG)
  #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;