pike.git / src / interpret_functions.h

version» Context lines:

pike.git/src/interpret_functions.h:1:   /* -  * $Id: interpret_functions.h,v 1.99 2001/12/16 22:48:08 mast Exp $ +  * $Id: interpret_functions.h,v 1.100 2002/04/08 03:05:53 marcus 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:2105:    new_frame->fun=Pike_fp->fun; \    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; \ +  SET_PROG_COUNTER(addr); \    new_frame->flags=PIKE_FRAME_RETURN_INTERNAL | XFLAGS; \    \ -  DO_JUMP_TO(addr); \ +  FETCH; \ +  DONE; \   }while(0)         /* Assume that the number of arguments is correct */   OPCODE1_JUMP(F_COND_RECUR, "recur if not overloaded", {    /* FIXME:    * this test should actually test if this function is    * overloaded or not. Currently it only tests if    * this context is inherited or not.    */