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.40 2000/04/08 02:01:08 hubbe Exp $ +  * $Id: interpret.h,v 1.41 2000/08/28 19:37:40 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:27:    struct pike_frame *next;    struct pike_frame *scope;    unsigned char *pc;    struct svalue *locals;    struct svalue *expendible;    struct object *current_object;    struct inherit context;    char *current_storage;   };    + struct external_variable_context + { +  struct object *o; +  struct inherit *inherit; +  int parent_identifier; + }; +  +    #ifdef PIKE_DEBUG   #define debug_check_stack() do{if(Pike_sp<Pike_evaluator_stack)fatal("Stack error.\n");}while(0)   #define check__positive(X,Y) if((X)<0) fatal Y   #include "error.h"   #else   #define check__positive(X,Y)   #define debug_check_stack()   #endif      #define check_stack(X) do { \
pike.git/src/interpret.h:178:   #else   #define fast_check_threads_etc(X) do { \    static int div_; if(!(div_++& ((1<<(X))-1))) check_threads_etc(); } while(0)   #endif      #include "block_alloc_h.h"   /* Prototypes begin here */   void push_sp_mark(void);   int pop_sp_mark(void);   void init_interpreter(void); + void find_external_context(struct external_variable_context *loc, +  int arg2);   void lvalue_to_svalue_no_free(struct svalue *to,struct svalue *lval);   void assign_lvalue(struct svalue *lval,struct svalue *from);   union anything *get_pointer_if_this_type(struct svalue *lval, TYPE_T t);   void print_return_value(void);   void reset_evaluator(void);   struct backlog;   void dump_backlog(void);   BLOCK_ALLOC(pike_frame,128)      void mega_apply(enum apply_type type, INT32 args, void *arg1, void *arg2);