pike.git/ src/ program.c

2000-04-06

2000-04-06 21:00:20 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

• 26dc07ad058af20189d50c3dd21ae8319c4d6ff5 (8 lines) (+5/-3) ^{[ Show | Annotate ]}
  Branch: 7.9

more debug

Rev: src/main.c:1.87
Rev: src/object.c:1.97
Rev: src/pike_memory.c:1.62
Rev: src/program.c:1.222

5:   \*/   /**/   #include "global.h" - RCSID("$Id: program.c,v 1.221 2000/04/06 20:17:05 hubbe Exp $"); + RCSID("$Id: program.c,v 1.222 2000/04/06 21:00:20 hubbe Exp $");   #include "program.h"   #include "object.h"   #include "dynamic_buffer.h"
3466:    int e;    add_ref(p);    for(e=0;e<p->num_constants;e++) +  {    free_svalue(& p->constants[e].sval); -  p->num_constants=0; /* evil */ +  p->constants[e].sval.type=T_INT; +  }       for(e=0;e<p->num_inherits;e++)    {
3479:    }       /* FIXME: Is there anything else that needs to be freed here? */ -  +     SET_NEXT_AND_FREE(p, free_program);    }else{    next=p->next;