# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 908369970 0
# Node ID bab6405012940f78daf7018d9e210e15813bf979
# Parent  f68b71f7b9fd92750abd5e1454833a89e294ef0a
(parse_menu_item): Avoid initialization for Lisp_Object.
(command_loop): Likewise.

diff -r f68b71f7b9fd -r bab640501294 src/keyboard.c
--- a/src/keyboard.c	Wed Oct 14 12:49:31 1998 +0000
+++ b/src/keyboard.c	Wed Oct 14 12:59:30 1998 +0000
@@ -1059,7 +1059,8 @@
 {
   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 @@
      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;