pike.git/ src/ program.c

2000-04-06

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

• 69ee4b9025442365804b521173f16d8acee55cd3 (12 lines) (+3/-9) ^{[ Show | Annotate ]}
  Branch: 7.9

better list-walking code...

Rev: src/builtin_functions.c:1.249
Rev: src/mapping.c:1.71
Rev: src/multiset.c:1.17
Rev: src/object.c:1.96
Rev: src/pike_macros.h:1.13
Rev: src/program.c:1.221

5:   \*/   /**/   #include "global.h" - RCSID("$Id: program.c,v 1.220 2000/04/06 09:05:54 hubbe Exp $"); + RCSID("$Id: program.c,v 1.221 2000/04/06 20:17:05 hubbe Exp $");   #include "program.h"   #include "object.h"   #include "dynamic_buffer.h"
3480:       /* FIXME: Is there anything else that needs to be freed here? */    -  while((next=p->next) && p->refs == 1) -  { -  add_ref(next); -  free_program(p); -  p=next; -  } -  -  free_program(p); +  SET_NEXT_AND_FREE(p, free_program);    }else{    next=p->next;    }