Branch: Tag:

2000-04-15

2000-04-15 08:15:49 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

more debug..

Rev: src/gc.c:1.68

29:      #include "block_alloc.h"    - RCSID("$Id: gc.c,v 1.67 2000/04/15 07:45:52 hubbe Exp $"); + RCSID("$Id: gc.c,v 1.68 2000/04/15 08:15:49 hubbe Exp $");      /* Run garbage collect approximate every time we have    * 20 percent of all arrays, objects and programs is
591: Inside #if defined(PIKE_DEBUG)
   return 0;    }    +  if(m->saved_refs != -1) +  if(m->saved_refs != *(INT32 *)a) +  fatal("Refs changed in gc()\n");    m->saved_refs = *(INT32 *)a;   #endif