pike.git / src / interpreter.h

version» Context lines:

pike.git/src/interpreter.h:1:   /*   || This file is part of Pike. For copyright information see COPYRIGHT.   || Pike is distributed under GPL, LGPL and MPL. See the file COPYING   || for more information. - || $Id: interpreter.h,v 1.85 2003/08/06 18:05:27 mast Exp $ + || $Id: interpreter.h,v 1.86 2004/05/29 18:19:25 grubba Exp $   */      #undef LOW_GET_ARG   #undef LOW_GET_JUMP   #undef LOW_SKIPJUMP   #undef GET_ARG   #undef GET_ARG2   #undef GET_JUMP   #undef SKIPJUMP   #undef DOJUMP
pike.git/src/interpreter.h:96:   #endif /* HAVE_COMPUTED_GOTO */      #ifdef HAVE_COMPUTED_GOTO    goto *strap;    normal_strap:   #endif /* HAVE_COMPUTED_GOTO */       debug_malloc_touch(Pike_fp);    while(1)    { +  INT32 arg1, arg2;    instr = pc[0];    Pike_fp->pc = pc++;       STEP_BREAK_LINE      #ifdef PIKE_DEBUG    if (d_flag || Pike_interpreter.trace_level > 2)    low_debug_instr_prologue (instr);   #endif   
pike.git/src/interpreter.h:144:    CASE(F_PREFIX2_CHARX256);    prefix2 += (pc++)[0]<<8;    DONE;   #endif /* HAVE_COMPUTED_GOTO */         #define INTERPRETER      #define OPCODE0(OP, DESC, FLAGS, CODE) CASE(OP); CODE; DONE   #define OPCODE1(OP, DESC, FLAGS, CODE) CASE(OP); { \ -  INT32 arg1=GET_ARG(); \ +  arg1=GET_ARG(); \    FETCH; \    CODE; \    } DONE      #define OPCODE2(OP, DESC, FLAGS, CODE) CASE(OP); { \ -  INT32 arg1=GET_ARG(); \ -  INT32 arg2=GET_ARG2(); \ +  arg1=GET_ARG(); \ +  arg2=GET_ARG2(); \    FETCH; \    CODE; \    } DONE      #define OPCODE0_ALIAS(OP, DESC, FLAGS, FUN) OPCODE0(OP, DESC, FLAGS, {FUN();})   #define OPCODE1_ALIAS(OP, DESC, FLAGS, FUN) OPCODE1(OP, DESC, FLAGS, {FUN(arg1);})   #define OPCODE2_ALIAS(OP, DESC, FLAGS, FUN) OPCODE2(OP, DESC, FLAGS, {FUN(arg1, arg2);})      #define OPCODE0_TAIL(OP, DESC, FLAGS, CODE) CASE(OP); CODE   #define OPCODE1_TAIL(OP, DESC, FLAGS, CODE) CASE(OP); CODE
pike.git/src/interpreter.h:186:   #define OPCODE2_TAILRETURN(OP, DESC, FLAGS, CODE) OPCODE2_TAIL(OP, DESC, FLAGS, CODE)      #define OPCODE0_PTRJUMP(OP, DESC, FLAGS, CODE) CASE(OP); CODE; DONE   #define OPCODE0_TAILPTRJUMP(OP, DESC, FLAGS, CODE) CASE(OP); CODE      /* These are something of a special case as they    * requires a POINTER stored explicitly after    * the instruction itself.    */   #define OPCODE1_PTRJUMP(OP, DESC, FLAGS, CODE) CASE(OP); { \ -  INT32 arg1=GET_ARG(); \ +  arg1=GET_ARG(); \    FETCH; \    CODE; \    } DONE      #define OPCODE2_PTRJUMP(OP, DESC, FLAGS, CODE) CASE(OP); { \ -  INT32 arg1=GET_ARG(); \ -  INT32 arg2=GET_ARG2(); \ +  arg1=GET_ARG(); \ +  arg2=GET_ARG2(); \    FETCH; \    CODE; \    } DONE      #define OPCODE1_TAILPTRJUMP(OP, DESC, FLAGS, CODE) CASE(OP); CODE   #define OPCODE2_TAILPTRJUMP(OP, DESC, FLAGS, CODE) CASE(OP); CODE      #define OPCODE0_BRANCH OPCODE0_PTRJUMP   #define OPCODE1_BRANCH OPCODE1_PTRJUMP   #define OPCODE2_BRANCH OPCODE2_PTRJUMP