1999-10-24
1999-10-24 14:24:46 by Henrik Grubbström (Grubba) <grubba@grubba.org>
-
c2548589aa61383ead1525c5a8f00c8a63194edc
(12 lines)
(+4/-8)
[
Show
| Annotate
]
Branch: 7.9
Reverted semi-fix.
Rev: src/program.c:1.166
5:
\*/
/**/
#include "global.h"
- RCSID("$Id: program.c,v 1.165 1999/10/24 05:56:35 hubbe Exp $");
+ RCSID("$Id: program.c,v 1.166 1999/10/24 14:24:46 grubba Exp $");
#include "program.h"
#include "object.h"
#include "dynamic_buffer.h"
2923: Inside #if defined(GC2)
void gc_check_all_programs(void)
{
struct program *p;
- struct program *next;
- for(p=first_program;p;p=next)
+ for(p=first_program;p;p=p->next)
{
int e;
- /* We don't want p to be freed under our feet... */
- add_ref(p);
+ debug_malloc_touch(p);
for(e=0;e<p->num_constants;e++) {
debug_gc_check_svalues(& p->constants[e].sval, 1, T_PROGRAM, p);
2970: Inside #if defined(PIKE_DEBUG)
}
}
#endif
-
- next = p->next;
- free_program(p);
+
}
}