From 07ba902ebf0d781ce9fb79b6fe3804134f807e1c Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Wed, 14 Oct 1998 12:59:30 +0000 Subject: [PATCH] (parse_menu_item): Avoid initialization for Lisp_Object. (command_loop): Likewise. --- src/keyboard.c | 13 +++++++++---- 1 file 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; -- 2.39.2