pike.git/ src/ program.c

2001-05-10

2001-05-10 22:14:38 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

• 9ddbf2b0a4882adef9ffedfa3248bdeb6c94dc31 (11 lines) (+7/-4) ^{[ Show | Annotate ]}
  Branch: 7.9

use less C stack

Rev: src/interpret.c:1.193
Rev: src/interpret.h:1.81
Rev: src/interpret_functions.h:1.52
Rev: src/lex.c:1.88
Rev: src/opcodes.h:1.14
Rev: src/program.c:1.320
Rev: src/testsuite.in:1.407

5:   \*/   /**/   #include "global.h" - RCSID("$Id: program.c,v 1.319 2001/05/05 21:00:17 grubba Exp $"); + RCSID("$Id: program.c,v 1.320 2001/05/10 22:14:38 hubbe Exp $");   #include "program.h"   #include "object.h"   #include "dynamic_buffer.h"
4238:   static void gc_check_frame(struct pike_frame *f)   {    if(!f) return; -  if(!debug_gc_check(f,PIKE_T_UNKNOWN,f) && f->malloced_locals) +  if(!debug_gc_check(f,PIKE_T_UNKNOWN,f) && (f->flags & PIKE_FRAME_MALLOCED_LOCALS))    {    if(f->current_object) gc_check(f->current_object);    if(f->context.prog) gc_check(f->context.prog);    if(f->context.parent) gc_check(f->context.parent); -  if(f->malloced_locals)gc_check_svalues(f->locals,f->num_locals); +  if(f->flags & PIKE_FRAME_MALLOCED_LOCALS) +  gc_check_svalues(f->locals,f->num_locals);    if(f->scope) gc_check_frame(f->scope);    }   }
4259:    if(f->current_object) gc_recurse_object(f->current_object);    if(f->context.prog) gc_recurse_program(f->context.prog);    if(f->context.parent) gc_recurse_object(f->context.parent); -  if(f->malloced_locals)gc_recurse_svalues(f->locals,f->num_locals); +  if(f->flags & PIKE_FRAME_MALLOCED_LOCALS) +  gc_recurse_svalues(f->locals,f->num_locals);    if(f->scope) gc_recurse_frame(f->scope);   }