pike.git / src / interpret_functions.h

version» Context lines:

pike.git/src/interpret_functions.h:1:   /* -  * $Id: interpret_functions.h,v 1.88 2001/08/16 03:27:35 hubbe Exp $ +  * $Id: interpret_functions.h,v 1.89 2001/08/30 18:30:42 hubbe Exp $    *    * Opcode definitions for the interpreter.    */      #include "global.h"      #undef CJUMP   #undef AUTO_BIGNUM_LOOP_TEST   #undef LOOP   #undef COMPARISON
pike.git/src/interpret_functions.h:2063:    push_zeroes((new_frame->num_locals = (ptrdiff_t)addr[-2]) - args); \    \    DO_IF_DEBUG({ \    if(t_flag > 3) \    fprintf(stderr,"- Allocating %d extra locals.\n", \    new_frame->num_locals - new_frame->num_args); \    }); \    \    \    new_frame->fun=Pike_fp->fun; \ -  new_frame->ident=Pike_fp->ident; \ +  DO_IF_PROFILING( new_frame->ident=Pike_fp->ident ); \    new_frame->current_storage=Pike_fp->current_storage; \    if(Pike_fp->scope) add_ref(new_frame->scope=Pike_fp->scope); \    add_ref(new_frame->current_object=Pike_fp->current_object); \    new_frame->context=Pike_fp->context; \    add_ref(new_frame->context.prog); \    if(new_frame->context.parent) \    add_ref(new_frame->context.parent); \    Pike_fp=new_frame; \    new_frame->flags=PIKE_FRAME_RETURN_INTERNAL | XFLAGS; \    \