diff options
| author | Andreas Schwab | 1998-04-14 13:01:59 +0000 |
|---|---|---|
| committer | Andreas Schwab | 1998-04-14 13:01:59 +0000 |
| commit | d52a7a92631eb442c97bec9880d881871858c8ea (patch) | |
| tree | 4edabac3b0be95e2ae39f8958ab73d2875ca3180 /src | |
| parent | d6b81c0f2f99ef177fb72ccebd1723fb73196cf5 (diff) | |
| download | emacs-d52a7a92631eb442c97bec9880d881871858c8ea.tar.gz emacs-d52a7a92631eb442c97bec9880d881871858c8ea.zip | |
(parse_menu_item): Don't GCPRO non-lisp variables.
Diffstat (limited to 'src')
| -rw-r--r-- | src/keyboard.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/keyboard.c b/src/keyboard.c index b6b00127630..9c56699d7e4 100644 --- a/src/keyboard.c +++ b/src/keyboard.c | |||
| @@ -5570,7 +5570,7 @@ parse_menu_item (item, notreal, inmenubar) | |||
| 5570 | if (!CONSP (item)) | 5570 | if (!CONSP (item)) |
| 5571 | return 0; | 5571 | return 0; |
| 5572 | 5572 | ||
| 5573 | GCPRO3 (item, notreal, inmenubar); | 5573 | GCPRO1 (item); |
| 5574 | 5574 | ||
| 5575 | /* Create item_properties vector if necessary. */ | 5575 | /* Create item_properties vector if necessary. */ |
| 5576 | if (NILP (item_properties)) | 5576 | if (NILP (item_properties)) |
| @@ -7899,7 +7899,7 @@ On such systems, Emacs starts a subshell instead of suspending.") | |||
| 7899 | /* sys_suspend can get an error if it tries to fork a subshell | 7899 | /* sys_suspend can get an error if it tries to fork a subshell |
| 7900 | and the system resources aren't available for that. */ | 7900 | and the system resources aren't available for that. */ |
| 7901 | record_unwind_protect ((Lisp_Object (*) P_ ((Lisp_Object))) init_sys_modes, | 7901 | record_unwind_protect ((Lisp_Object (*) P_ ((Lisp_Object))) init_sys_modes, |
| 7902 | 0); | 7902 | Qnil); |
| 7903 | stuff_buffered_input (stuffstring); | 7903 | stuff_buffered_input (stuffstring); |
| 7904 | if (cannot_suspend) | 7904 | if (cannot_suspend) |
| 7905 | sys_subshell (); | 7905 | sys_subshell (); |