pike.git / src / interpret.h

version» Context lines:

pike.git/src/interpret.h: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.   \*/      /* -  * $Id: interpret.h,v 1.29 1999/04/12 20:00:37 grubba Exp $ +  * $Id: interpret.h,v 1.30 1999/04/15 19:12:50 hubbe Exp $    */   #ifndef INTERPRET_H   #define INTERPRET_H      #include "global.h"   #include "program.h"      #ifndef STRUCT_FRAME_DECLARED   #define STRUCT_FRAME_DECLARED   #endif
pike.git/src/interpret.h:50:      #define check_mark_stack(X) do { \    if(mark_sp - mark_stack + (X) >= stack_size) \    error("Mark stack overflow.\n"); \    }while(0)      #define check_c_stack(X) do { \    long x_= ((char *)&x_) + STACK_DIRECTION * (X) - stack_top ; \    x_*=STACK_DIRECTION; \    if(x_>0) \ -  error("C stack overflow.\n"); \ +  low_error("C stack overflow.\n"); \    }while(0)         #define pop_stack() do{ free_svalue(--sp); debug_check_stack(); }while(0)      #define pop_n_elems(X) \    do { int x_=(X); if(x_) { \    check__positive(x_,"Popping negative number of args....\n"); \    sp-=x_; debug_check_stack(); \    free_svalues(sp,x_,BIT_MIXED); \