# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 757358952 0
# Node ID ca652195857787a998860b1d1f0578c8b6e17744
# Parent  cfd16a1af914de9a13b90ae22a4c89824ce330e3
(lispy_accent_codes): Cope if an XK symbol is undefined.
(make_lispy_event): Define i.

diff -r cfd16a1af914 -r ca6521958577 src/keyboard.c
--- a/src/keyboard.c	Fri Dec 31 15:04:23 1993 +0000
+++ b/src/keyboard.c	Fri Dec 31 17:29:12 1993 +0000
@@ -2122,19 +2122,71 @@
 
 static int lispy_accent_codes[] =
 {
+#ifdef XK_dead_circumflex
   XK_dead_circumflex,
+#else
+  0,
+#endif
+#ifdef XK_dead_grave
   XK_dead_grave,
+#else
+  0,
+#endif
+#ifdef XK_dead_tilde
   XK_dead_tilde,
+#else
+  0,
+#endif
+#ifdef XK_dead_diaeresis
   XK_dead_diaeresis,
+#else
+  0,
+#endif
+#ifdef XK_dead_macron
   XK_dead_macron,
+#else
+  0,
+#endif
+#ifdef XK_dead_degree
   XK_dead_degree,
+#else
+  0,
+#endif
+#ifdef XK_dead_acute
   XK_dead_acute,
+#else
+  0,
+#endif
+#ifdef XK_dead_cedilla
   XK_dead_cedilla,
+#else
+  0,
+#endif
+#ifdef XK_dead_breve
   XK_dead_breve,
+#else
+  0,
+#endif
+#ifdef XK_dead_ogonek
   XK_dead_ogonek,
+#else
+  0,
+#endif
+#ifdef XK_dead_caron
   XK_dead_caron,
+#else
+  0,
+#endif
+#ifdef XK_dead_doubleacute
   XK_dead_doubleacute,
+#else
+  0,
+#endif
+#ifdef XK_dead_abovedot
   XK_dead_abovedot,
+#else
+  0,
+#endif
 };
 
 /* This is a list of Lisp names for special "accent" characters.
@@ -2310,6 +2362,8 @@
 make_lispy_event (event)
      struct input_event *event;
 {
+  int i;
+
 #ifdef SWITCH_ENUM_BUG
   switch ((int) event->kind)
 #else