Branch: Tag:

1996-02-24

1996-02-24 02:42:05 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

Garbage collect finished

Rev: lib/simulate.lpc:1.9
Rev: src/ChangeLog:1.17
Rev: src/Makefile.in:1.9
Rev: src/array.c:1.7
Rev: src/array.h:1.4
Rev: src/backend.c:1.3
Rev: src/backend.h:1.3
Rev: src/builtin_efuns.c:1.10
Rev: src/call_out.c:1.3
Rev: src/config.h:1.3
Rev: src/debug.c:1.2(DEAD)
Rev: src/debug.h:1.2(DEAD)
Rev: src/global.h:1.2
Rev: src/mapping.c:1.3
Rev: src/mapping.h:1.2
Rev: src/modules/efuns.c:1.2(DEAD)
Rev: src/modules/files/Makefile.in:1.2
Rev: src/modules/regexp/Makefile.in:1.2
Rev: src/modules/sprintf/Makefile.in:1.2
Rev: src/object.c:1.6
Rev: src/object.h:1.4
Rev: src/program.c:1.7
Rev: src/program.h:1.3
Rev: src/stralloc.c:1.2
Rev: src/stralloc.h:1.2
Rev: src/svalue.c:1.6
Rev: src/svalue.h:1.4
Rev: src/test/create_testsuite:1.8

411: Inside #if defined(DEBUG)
     #ifdef DEBUG    - void check_mapping(struct mapping *m,int pass) + void check_mapping(struct mapping *m)   { -  if(pass) -  { -  if(checked((void *)m,0) != m->refs) -  fatal("Mapping has wrong number of refs.\n"); -  return; -  } -  +     if(m->refs <=0)    fatal("Mapping has zero refs.\n");   
434: Inside #if defined(DEBUG)
   if(first_mapping != m)    fatal("Mapping ->prev == 0 but first_mapping != mapping.\n");    } -  checked((void *)m->ind,1); -  checked((void *)m->val,1); +    }    - void check_all_mappings(int pass) + void check_all_mappings()   {    struct mapping *m;    for(m=first_mapping;m;m=m->next) -  check_mapping(m,pass); -  -  if(!pass) -  checked((void *)first_mapping,1); +  check_mapping(m);   }   #endif