diff options
| author | Jim Blandy | 1991-08-11 04:35:38 +0000 |
|---|---|---|
| committer | Jim Blandy | 1991-08-11 04:35:38 +0000 |
| commit | ad236261051f3106a80bba5a50fcf91476cae9d1 (patch) | |
| tree | 0f930e24d899570484da9c03e7920150b057af5b /src | |
| parent | 708c60f8afefdaa6990da69abb79c535dd79edeb (diff) | |
| download | emacs-ad236261051f3106a80bba5a50fcf91476cae9d1.tar.gz emacs-ad236261051f3106a80bba5a50fcf91476cae9d1.zip | |
*** empty log message ***
Diffstat (limited to 'src')
| -rw-r--r-- | src/eval.c | 5 | ||||
| -rw-r--r-- | src/lisp.h | 2 |
2 files changed, 5 insertions, 2 deletions
diff --git a/src/eval.c b/src/eval.c index 4a8ebf7938b..de6784a81b6 100644 --- a/src/eval.c +++ b/src/eval.c | |||
| @@ -66,7 +66,7 @@ struct catchtag | |||
| 66 | struct catchtag *catchlist; | 66 | struct catchtag *catchlist; |
| 67 | 67 | ||
| 68 | Lisp_Object Qautoload, Qmacro, Qexit, Qinteractive, Qcommandp, Qdefun; | 68 | Lisp_Object Qautoload, Qmacro, Qexit, Qinteractive, Qcommandp, Qdefun; |
| 69 | Lisp_Object Vquit_flag, Vinhibit_quit; | 69 | Lisp_Object Qinhibit_quit, Vinhibit_quit, Vquit_flag; |
| 70 | Lisp_Object Qmocklisp_arguments, Vmocklisp_arguments, Qmocklisp; | 70 | Lisp_Object Qmocklisp_arguments, Vmocklisp_arguments, Qmocklisp; |
| 71 | Lisp_Object Qand_rest, Qand_optional; | 71 | Lisp_Object Qand_rest, Qand_optional; |
| 72 | Lisp_Object Qdebug_on_error; | 72 | Lisp_Object Qdebug_on_error; |
| @@ -2248,6 +2248,9 @@ To prevent this happening, set `quit-flag' to nil\n\ | |||
| 2248 | before making `inhibit-quit' nil."); | 2248 | before making `inhibit-quit' nil."); |
| 2249 | Vinhibit_quit = Qnil; | 2249 | Vinhibit_quit = Qnil; |
| 2250 | 2250 | ||
| 2251 | Qinhibit_quit = intern ("inhibit-quit"); | ||
| 2252 | staticpro (&Qinhibit_quit); | ||
| 2253 | |||
| 2251 | Qautoload = intern ("autoload"); | 2254 | Qautoload = intern ("autoload"); |
| 2252 | staticpro (&Qautoload); | 2255 | staticpro (&Qautoload); |
| 2253 | 2256 | ||
diff --git a/src/lisp.h b/src/lisp.h index 1dfc65a6df8..12fbd7fcb5d 100644 --- a/src/lisp.h +++ b/src/lisp.h | |||
| @@ -915,7 +915,7 @@ extern Lisp_Object intern (), oblookup (); | |||
| 915 | 915 | ||
| 916 | /* Defined in eval.c */ | 916 | /* Defined in eval.c */ |
| 917 | extern Lisp_Object Qautoload, Qexit, Qinteractive, Qcommandp, Qdefun, Qmacro; | 917 | extern Lisp_Object Qautoload, Qexit, Qinteractive, Qcommandp, Qdefun, Qmacro; |
| 918 | extern Lisp_Object Vinhibit_quit, Vquit_flag; | 918 | extern Lisp_Object Vinhibit_quit, Qinhibit_quit, Vquit_flag; |
| 919 | extern Lisp_Object Vmocklisp_arguments, Qmocklisp, Qmocklisp_arguments; | 919 | extern Lisp_Object Vmocklisp_arguments, Qmocklisp, Qmocklisp_arguments; |
| 920 | extern Lisp_Object Vautoload_queue; | 920 | extern Lisp_Object Vautoload_queue; |
| 921 | extern Lisp_Object Vrun_hooks; | 921 | extern Lisp_Object Vrun_hooks; |