diff options
author | Richard M. Stallman <rms@gnu.org> | 1998-10-14 12:59:30 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 1998-10-14 12:59:30 +0000 |
commit | 07ba902ebf0d781ce9fb79b6fe3804134f807e1c (patch) | |
tree | 9678e148b2f6a08f6579cd01a163121c5aa88158 /src | |
parent | 0a6f5134bd3d4dfa8293c3bca44d83f46891dcd3 (diff) | |
download | emacs-07ba902ebf0d781ce9fb79b6fe3804134f807e1c.tar.gz |
(parse_menu_item): Avoid initialization for Lisp_Object.
(command_loop): Likewise.
Diffstat (limited to 'src')
-rw-r--r-- | src/keyboard.c | 13 |
1 files changed, 9 insertions, 4 deletions
diff --git a/src/keyboard.c b/src/keyboard.c index 730b07a9531..adfda2e9bcb 100644 --- a/src/keyboard.c +++ b/src/keyboard.c @@ -1059,7 +1059,8 @@ command_loop () { if (command_loop_level > 0 || minibuf_level > 0) { - Lisp_Object val = internal_catch (Qexit, command_loop_2, Qnil); + Lisp_Object val; + val = internal_catch (Qexit, command_loop_2, Qnil); executing_macro = Qnil; return val; } @@ -5836,12 +5837,16 @@ parse_menu_item (item, notreal, inmenubar) int notreal, inmenubar; { Lisp_Object def, tem, item_string, start; - Lisp_Object cachelist = Qnil; - Lisp_Object filter = Qnil; - Lisp_Object keyhint = Qnil; + Lisp_Object cachelist; + Lisp_Object filter; + Lisp_Object keyhint; int i; int newcache = 0; + cachelist = Qnil; + filter = Qnil; + keyhint = Qnil; + if (!CONSP (item)) return 0; |