# HG changeset patch # User Jim Blandy # Date 681885338 0 # Node ID 0673e72f6c8c7e715d1f5658b70d38f9ba7e92c6 # Parent 2ee1959869809f81b47c0c746efb72e7ccc28de3 *** empty log message *** diff -r 2ee195986980 -r 0673e72f6c8c src/eval.c --- a/src/eval.c Sun Aug 11 01:03:47 1991 +0000 +++ b/src/eval.c Sun Aug 11 04:35:38 1991 +0000 @@ -66,7 +66,7 @@ struct catchtag *catchlist; Lisp_Object Qautoload, Qmacro, Qexit, Qinteractive, Qcommandp, Qdefun; -Lisp_Object Vquit_flag, Vinhibit_quit; +Lisp_Object Qinhibit_quit, Vinhibit_quit, Vquit_flag; Lisp_Object Qmocklisp_arguments, Vmocklisp_arguments, Qmocklisp; Lisp_Object Qand_rest, Qand_optional; Lisp_Object Qdebug_on_error; @@ -2248,6 +2248,9 @@ before making `inhibit-quit' nil."); Vinhibit_quit = Qnil; + Qinhibit_quit = intern ("inhibit-quit"); + staticpro (&Qinhibit_quit); + Qautoload = intern ("autoload"); staticpro (&Qautoload); diff -r 2ee195986980 -r 0673e72f6c8c src/lisp.h --- a/src/lisp.h Sun Aug 11 01:03:47 1991 +0000 +++ b/src/lisp.h Sun Aug 11 04:35:38 1991 +0000 @@ -915,7 +915,7 @@ /* Defined in eval.c */ extern Lisp_Object Qautoload, Qexit, Qinteractive, Qcommandp, Qdefun, Qmacro; -extern Lisp_Object Vinhibit_quit, Vquit_flag; +extern Lisp_Object Vinhibit_quit, Qinhibit_quit, Vquit_flag; extern Lisp_Object Vmocklisp_arguments, Qmocklisp, Qmocklisp_arguments; extern Lisp_Object Vautoload_queue; extern Lisp_Object Vrun_hooks;