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.193 2001/05/10 22:14:36 hubbe Exp $"); + RCSID("$Id: interpret.c,v 1.194 2001/05/11 11:39:04 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:79:   #endif         /* Pike_sp points to first unused value on stack    * (much simpler than letting it point at the last used value.)    */   PMOD_EXPORT struct Pike_interpreter Pike_interpreter;   PMOD_EXPORT int Pike_stack_size = EVALUATOR_STACK_SIZE;       + void gdb_stop_here(void) + { +  ; + } +  +    /* mark stack, used to store markers into the normal stack */   int mark_stack_malloced = 0;      void push_sp_mark(void)   {    if(Pike_mark_sp == Pike_interpreter.mark_stack + Pike_stack_size)    Pike_error("No more mark stack!\n");    *Pike_mark_sp++=Pike_sp;   }   ptrdiff_t pop_sp_mark(void)
pike.git/src/interpret.c:1443: Inside #if 1
   if(freespace > ((Pike_mark_sp - fp->mark_sp_base)<<2)+32)    {    MEMMOVE(smsp,    fp->save_mark_sp,    sizeof(struct svalue **)*(Pike_mark_sp - fp->mark_sp_base));    fp->mark_sp_base-=freespace;    }   #endif   }    - void gdb_stop_here(void) - { -  ; - } +     -  -  +    #ifdef PIKE_SECURITY   /* Magic trick */   static      #else   #define mega_apply2 mega_apply   #endif      void mega_apply2(enum apply_type type, INT32 args, void *arg1, void *arg2)   {