home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Geek Gadgets 1
/
ADE-1.bin
/
ade-dist
/
emacs-19.28-src.tgz
/
tar.out
/
fsf
/
emacs
/
src
/
eval_protos.h
< prev
next >
Wrap
C/C++ Source or Header
|
1996-09-28
|
5KB
|
304 lines
/* Prototypes for functions defined in
eval.c
*/
extern struct backtrace * backtrace_list;
extern struct catchtag * catchlist;
extern int Qautoload;
extern int Qmacro;
extern int Qexit;
extern int Qinteractive;
extern int Qcommandp;
extern int Qdefun;
extern int Qinhibit_quit;
extern int Vinhibit_quit;
extern int Vquit_flag;
extern int Qmocklisp_arguments;
extern int Vmocklisp_arguments;
extern int Qmocklisp;
extern int Qand_rest;
extern int Qand_optional;
extern int Qdebug_on_error;
extern int Vrun_hooks;
extern int Vautoload_queue;
extern int specpdl_size;
extern struct specbinding * specpdl;
extern struct specbinding * specpdl_ptr;
extern int max_specpdl_size;
extern int lisp_eval_depth;
extern int max_lisp_eval_depth;
extern int debug_on_next_call;
extern int Vstack_trace_on_error;
extern int Vdebug_on_error;
extern int debug_on_quit;
extern int when_entered_debugger;
extern int Vdebugger;
int init_eval_once(void);
int init_eval(void);
int call_debugger(int arg);
int do_debug_on_call(int code);
extern struct Lisp_Subr Sor;
int For(int );
extern struct Lisp_Subr Sand;
int Fand(int );
extern struct Lisp_Subr Sif;
int Fif(int );
extern struct Lisp_Subr Scond;
int Fcond(int );
extern struct Lisp_Subr Sprogn;
int Fprogn(int );
extern struct Lisp_Subr Sprog1;
int Fprog1(int );
extern struct Lisp_Subr Sprog2;
int Fprog2(int );
extern struct Lisp_Subr Ssetq;
int Fsetq(int );
extern struct Lisp_Subr Squote;
int Fquote(int );
extern struct Lisp_Subr Sfunction;
int Ffunction(int );
extern struct Lisp_Subr Sinteractive_p;
int Finteractive_p(void);
extern struct Lisp_Subr Sdefun;
int Fdefun(int );
extern struct Lisp_Subr Sdefmacro;
int Fdefmacro(int );
extern struct Lisp_Subr Sdefvar;
int Fdefvar(int );
extern struct Lisp_Subr Sdefconst;
int Fdefconst(int );
extern struct Lisp_Subr Suser_variable_p;
int Fuser_variable_p(int );
extern struct Lisp_Subr SletX;
int FletX(int );
extern struct Lisp_Subr Slet;
int Flet(int );
extern struct Lisp_Subr Swhile;
int Fwhile(int );
extern struct Lisp_Subr Smacroexpand;
int Fmacroexpand(int , int );
extern struct Lisp_Subr Scatch;
int Fcatch(int );
int internal_catch(int tag,
int (* func)(),
int arg);
void unwind_to_catch(struct catchtag * catch,
int value);
extern struct Lisp_Subr Sthrow;
int Fthrow(int , int );
extern struct Lisp_Subr Sunwind_protect;
int Funwind_protect(int );
extern struct handler * handlerlist;
extern struct Lisp_Subr Scondition_case;
int Fcondition_case(int );
int internal_condition_case(int (* bfun)(),
int handlers,
int (* hfun)());
int internal_condition_case_1(int (* bfun)(),
int arg,
int handlers,
int (* hfun)());
extern struct Lisp_Subr Ssignal;
int Fsignal(int , int );
int wants_debugger(int list,
int conditions);
int find_handler_clause(int handlers,
int conditions,
int sig,
int data,
int * debugger_value_ptr);
void error(char * m, ...);
/* char * a1,
char * a2,
char * a3);
*/
extern struct Lisp_Subr Scommandp;
int Fcommandp(int );
extern struct Lisp_Subr Sautoload;
int Fautoload(int , int , int , int , int );
int un_autoload(int oldqueue);
int do_autoload(int fundef,
int funname);
extern struct Lisp_Subr Seval;
int Feval(int );
extern struct Lisp_Subr Sapply;
int Fapply(int , int * );
int apply1(int fn,
int arg);
int call0(int fn);
int call1(int fn,
int arg1);
int call2(int fn,
int arg1,
int arg2);
int call3(int fn,
int arg1,
int arg2,
int arg3);
int call4(int fn,
int arg1,
int arg2,
int arg3,
int arg4);
int call5(int fn,
int arg1,
int arg2,
int arg3,
int arg4,
int arg5);
int call6(int fn,
int arg1,
int arg2,
int arg3,
int arg4,
int arg5,
int arg6);
extern struct Lisp_Subr Sfuncall;
int Ffuncall(int , int * );
int apply_lambda(int fun,
int args,
int eval_flag);
int funcall_lambda(int fun,
int nargs,
register int * arg_vector);
void grow_specpdl(void);
void specbind(int symbol,
int value);
void record_unwind_protect(int (* function)(),
int arg);
int unbind_to(int count,
int value);
extern struct Lisp_Subr Sbacktrace_debug;
int Fbacktrace_debug(int , int );
extern struct Lisp_Subr Sbacktrace;
int Fbacktrace(void);
extern struct Lisp_Subr Sbacktrace_frame;
int Fbacktrace_frame(int );
int syms_of_eval(void);