pike.git/ src/ program.c

1997-01-28

1997-01-28 03:28:45 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

• 93673591be17905114da91f6e051ad8f07733821 (18 lines) (+17/-1) ^{[ Show | Annotate ]}
  Branch: 7.9

more debug added

Rev: src/modules/files/file.c:1.24
Rev: src/program.c:1.16
Rev: src/stralloc.c:1.9
Rev: src/stralloc.h:1.6
Rev: src/svalue.c:1.5

4:   ||| See the files COPYING and DISCLAIMER for more information.   \*/   #include "global.h" - RCSID("$Id: program.c,v 1.15 1997/01/27 01:30:25 hubbe Exp $"); + RCSID("$Id: program.c,v 1.16 1997/01/28 03:11:50 hubbe Exp $");   #include "program.h"   #include "object.h"   #include "dynamic_buffer.h"
1558: Inside #if defined(GC2)
  {    struct program *p;    for(p=first_program;p;p=p->next) +  {    gc_check_svalues(p->constants, p->num_constants); -  +  +  if(d_flag) +  { +  int e; +  for(e=0;e<(int)p->num_strings;e++) +  gc_check(p->strings[e]); +  +  for(e=0;e<(int)p->num_identifiers;e++) +  { +  gc_check(p->identifiers[e].name); +  gc_check(p->identifiers[e].type);    } -  +  } +  } + }      void gc_mark_all_programs()   {