2000-07-18
2000-07-18 06:30:57 by Martin Stjernholm <mast@lysator.liu.se>
-
fb5e41b1a5f03cda03764aed68705c83e18e1e05
(8 lines)
(+6/-2)
[
Show
| Annotate
]
Branch: 7.9
Silence dmalloc.
Rev: src/gc.c:1.108
29:
#include "block_alloc.h"
- RCSID("$Id: gc.c,v 1.107 2000/07/18 05:48:20 mast Exp $");
+ RCSID("$Id: gc.c,v 1.108 2000/07/18 06:30:57 mast Exp $");
/* Run garbage collect approximately every time
* 20 percent of all arrays, objects and programs is
2048: Inside #if defined(PIKE_DEBUG)
#ifdef PIKE_DEBUG
destroy_count = 0;
#endif
- for (; kill_list; kill_list = NEXT(kill_list)) {
+ while (kill_list) {
+ struct gc_frame *next = NEXT(kill_list);
struct object *o = (struct object *) kill_list->data;
#ifdef PIKE_DEBUG
if ((get_marker(kill_list->data)->flags & (GC_LIVE|GC_LIVE_OBJ)) !=
2066: Inside #if defined(PIKE_DEBUG)
#ifdef PIKE_DEBUG
destroy_count++;
#endif
+ really_free_gc_frame(kill_list);
+ kill_list = next;
}
GC_VERBOSE_DO(fprintf(stderr, "| kill: %u objects killed, %d things really freed\n",