pike.git / src / interpret.c

version» Context lines:

pike.git/src/interpret.c:1:   /*\   ||| This file a part of Pike, and is copyright by Fredrik Hubinette   ||| Pike is distributed as GPL (General Public License)   ||| See the files COPYING and DISCLAIMER for more information.   \*/   /**/   #include "global.h" - RCSID("$Id: interpret.c,v 1.235 2001/07/27 08:32:03 hubbe Exp $"); + RCSID("$Id: interpret.c,v 1.236 2001/07/27 15:02:03 grubba Exp $");   #include "interpret.h"   #include "object.h"   #include "program.h"   #include "svalue.h"   #include "array.h"   #include "mapping.h"   #include "pike_error.h"   #include "language.h"   #include "stralloc.h"   #include "constants.h"
pike.git/src/interpret.c:802:   #define OPCODE2_JUMP(O,N,C) OPCODE2(O,N,C)      #define OPCODE0_TAIL(O,N,C) OPCODE0(O,N,C)   #define OPCODE1_TAIL(O,N,C) OPCODE1(O,N,C)   #define OPCODE2_TAIL(O,N,C) OPCODE2(O,N,C)      #define OPCODE0_TAILJUMP(O,N,C) OPCODE0(O,N,C)   #define OPCODE1_TAILJUMP(O,N,C) OPCODE1(O,N,C)   #define OPCODE2_TAILJUMP(O,N,C) OPCODE2(O,N,C)    + #define OPCODE0_RETURN(O,N,C) OPCODE0(O,N,C) + #define OPCODE1_RETURN(O,N,C) OPCODE1(O,N,C) + #define OPCODE2_RETURN(O,N,C) OPCODE2(O,N,C) +  + #define OPCODE0_RETURNJUMP(O,N,C) OPCODE0(O,N,C) + #define OPCODE1_RETURNJUMP(O,N,C) OPCODE1(O,N,C) + #define OPCODE2_RETURNJUMP(O,N,C) OPCODE2(O,N,C) +    #undef HAVE_COMPUTED_GOTO      #ifdef __GNUC__      /* Define the program counter if necessary. */   DEF_PROG_COUNTER;      static int eval_instruction(PIKE_OPCODE_T *pc)   {    do_inter_return_label = && inter_return_label;