Branch: Tag:

2001-06-27

2001-06-27 00:01:33 by Martin Stjernholm <mast@lysator.liu.se>

Fixed bogus touching of the "lesser" mapping_data struct which could cause
false alarms when running with gc self-tests.

Rev: src/mapping.c:1.118

5:   \*/   /**/   #include "global.h" - RCSID("$Id: mapping.c,v 1.117 2001/06/08 14:26:41 mast Exp $"); + RCSID("$Id: mapping.c,v 1.118 2001/06/27 00:01:33 mast Exp $");   #include "main.h"   #include "object.h"   #include "mapping.h"
1869: Inside #if defined(PIKE_DEBUG)
   fatal("md->valrefs < 0\n");       if(md->hardlinks <0) -  fatal("md->valrefs < 0\n"); +  fatal("md->hardlinks < 0\n");       if(md->refs < md->valrefs+1)    fatal("md->refs < md->valrefs+1\n");       if(md->valrefs < md->hardlinks) -  fatal("md->refs < md->valrefs+1\n"); +  fatal("md->valrefs < md->hardlinks\n");       if(md->hashsize < 0)    fatal("Assert: I don't think he's going to make it Jim.\n");
2166: Inside #if defined(PIKE_DEBUG)
   fatal("Error in mapping link list.\n");    for (m = first_mapping; m; m = m->next) {    debug_gc_touch(m); -  debug_gc_touch(m->data); +     n++;    if (m->next && m->next->prev != m)    fatal("Error in mapping link list.\n");