Branch: Tag:

2001-06-30

2001-06-30 21:28:36 by Martin Stjernholm <mast@lysator.liu.se>

Improved output from locate_references(). Some more gc debug.

Rev: src/gc.c:1.161
Rev: src/gc.h:1.78
Rev: src/mapping.c:1.127
Rev: src/multiset.c:1.36
Rev: src/object.c:1.174
Rev: src/program.c:1.338
Rev: src/security.c:1.31
Rev: src/threads.c:1.159

5:   \*/   /**/   #include "global.h" - RCSID("$Id: mapping.c,v 1.126 2001/06/27 00:01:31 mast Exp $"); + RCSID("$Id: mapping.c,v 1.127 2001/06/30 21:28:36 mast Exp $");   #include "main.h"   #include "object.h"   #include "mapping.h"
2214:    INT32 e;    struct keypair *k;    -  if(debug_gc_check(md, T_MAPPING, m)) return; +  if(debug_gc_check2(md, T_MAPPING, m, " as mapping data block of a mapping")) +  return;       if (!(md->flags & MAPPING_WEAK) || MAPPING_DATA_IN_USE(md))    /* Disregard the weak flag if the mapping data is busy; we must