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.213 2001/07/06 22:56:56 grubba Exp $"); + RCSID("$Id: interpret.c,v 1.214 2001/07/08 18:54:52 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:57:    */   #define EVALUATOR_STACK_SIZE 100000      #define TRACE_LEN (100 + t_flag * 10)      /* Keep some margin on the stack space checks. They're lifted when    * handle_error runs to give it some room. */   #define SVALUE_STACK_MARGIN 100 /* Tested in 7.1: 40 was enough, 30 wasn't. */   #define C_STACK_MARGIN 8000 /* Tested in 7.1: 3000 was enough, 2600 wasn't. */    + #ifdef HAVE_COMPUTED_GOTO + PIKE_OPCODE_T *fcode_to_opcode = NULL; + #endif /* HAVE_COMPUTED_GOTO */      PMOD_EXPORT const char *Pike_check_stack_errmsg =    "Svalue stack overflow. "    "(%ld of %ld entries on stack, needed %ld more entries)\n";   PMOD_EXPORT const char *Pike_check_mark_stack_errmsg =    "Mark stack overflow.\n";   PMOD_EXPORT const char *Pike_check_c_stack_errmsg =    "C stack overflow.\n";      
pike.git/src/interpret.c:718: Inside #if defined(PIKE_DEBUG)
     #ifdef PIKE_DEBUG   #define EVAL_INSTR_RET_CHECK(x) \    if (x == -2) \    fatal("Return value -2 from eval_instruction is not handled here.\n"\    "Probable cause: F_ESCAPE_CATCH outside catch block.\n")   #else   #define EVAL_INSTR_RET_CHECK(x)   #endif    - #ifdef PIKE_DEBUG + /* NOTE: Due to the implementation of computed goto, +  * interpreter.h may only be included once. +  */ + #if defined(PIKE_DEBUG) && !defined(HAVE_COMPUTED_GOTO)   #define eval_instruction eval_instruction_with_debug   #include "interpreter_debug.h"      #undef eval_instruction   #define eval_instruction eval_instruction_without_debug   #undef PIKE_DEBUG   #define print_return_value()   #include "interpreter.h"   #undef print_return_value   #define PIKE_DEBUG