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.51 2000/07/07 15:23:56 grubba Exp $ +  * $Id: interpret.h,v 1.52 2000/07/28 17:16:55 hubbe Exp $    */   #ifndef INTERPRET_H   #define INTERPRET_H      #include "global.h"   #include "program.h"   #include "error.h"      struct Pike_interpreter {    /* Swapped variables */
pike.git/src/interpret.h:209:    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 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); + PMOD_EXPORT 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); - void f_call_function(INT32 args); - int apply_low_safe_and_stupid(struct object *o, INT32 offset); - void safe_apply_low(struct object *o,int fun,int args); - void safe_apply(struct object *o, char *fun ,INT32 args); - void apply_lfun(struct object *o, int fun, int args); - void apply_shared(struct object *o, + PMOD_EXPORT void mega_apply(enum apply_type type, INT32 args, void *arg1, void *arg2); + PMOD_EXPORT void f_call_function(INT32 args); + PMOD_EXPORT int apply_low_safe_and_stupid(struct object *o, INT32 offset); + PMOD_EXPORT void safe_apply_low(struct object *o,int fun,int args); + PMOD_EXPORT void safe_apply(struct object *o, char *fun ,INT32 args); + PMOD_EXPORT void apply_lfun(struct object *o, int fun, int args); + PMOD_EXPORT void apply_shared(struct object *o,    struct pike_string *fun,    int args); - void apply(struct object *o, char *fun, int args); - void apply_svalue(struct svalue *s, INT32 args); - void slow_check_stack(void); + PMOD_EXPORT void apply(struct object *o, char *fun, int args); + PMOD_EXPORT void apply_svalue(struct svalue *s, INT32 args); + PMOD_EXPORT void slow_check_stack(void);   void cleanup_interpret(void);   void really_clean_up_interpret(void);   /* Prototypes end here */    - extern int Pike_stack_size; - struct callback; - extern struct callback_list evaluator_callbacks; - extern void call_callback(struct callback_list *, void *); + PMOD_EXPORT extern int d_flag; /* really in main.c */    -  + PMOD_EXPORT extern int Pike_stack_size; + PMOD_EXPORT struct callback; + PMOD_EXPORT extern struct callback_list evaluator_callbacks; + PMOD_EXPORT extern void call_callback(struct callback_list *, void *); +    /* Things to try:    * we could reduce thread swapping to a pointer operation if    * we do something like:    * #define Pike_interpreter (*Pike_interpreter_pointer)    *    * Since global variables are usually accessed through indirection    * anyways, it might not make any speed differance.    *    * The above define could also be used to facilitate dynamic loading    * on Win32..    */ - extern struct Pike_interpreter Pike_interpreter; + PMOD_EXPORT extern struct Pike_interpreter Pike_interpreter;      #define Pike_sp Pike_interpreter.stack_pointer   #define Pike_fp Pike_interpreter.frame_pointer   #define Pike_mark_sp Pike_interpreter.mark_stack_pointer   #ifdef PIKE_THREADS   #define Pike_thread_id Pike_interpreter.thread_id   #endif      #ifndef NO_PIKE_SHORTHAND