(mark_kboards): Move to keyboard.c.

diff --git a/src/ChangeLog b/src/ChangeLog
index bd4ce39e3eb17bb182551e65fea58d71a7110724..08b9ec389281f76cfd9e8e4ffb86018152bc87b6 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,7 +1,27 @@
+2003-06-15  Stefan Monnier  <monnier@cs.yale.edu>
+
+       * termhooks.h (EVENT_INIT): New macro.
+
+       * keyboard.c (mark_kboards): Move from alloc.c.  Mark kbd_buffer.
+
+       * alloc.c (mark_kboards): Move to keyboard.c.
+
+       * keyboard.c (record_asynch_buffer_change, read_avail_input):
+       * xterm.c (x_dispatch_event):
+       * xmenu.c (find_and_call_menu_selection):
+       * xdisp.c (handle_tool_bar_click):
+       * w32menu.c (menubar_selection_callback):
+       * sysdep.c (kbd_input_ast, read_input_waiting):
+       * msdos.c (dos_rawgetc):
+       * macterm.c (mac_check_for_quit_char):
+       * macmenu.c (menubar_selection_callback):
+       * gtkutil.c (xg_tool_bar_callback): Don't pass uninitialized
+       data to kbd_buffer_store_event.
+
 2003-06-15  Kim F. Storm  <storm@cua.dk>
 
        * xdisp.c (x_fix_overlapping_area): Always use area relative X
-       to fix redisplay problem with tall characters (such as \e,AC\e(B).  
+       to fix redisplay problem with tall characters (such as \e,AC\e(B).
 
 2003-06-13  Kai Gro\e,A_\e(Bjohann  <kai.grossjohann@gmx.net>
 
@@ -15,8 +35,8 @@
 
        * alloca.c (alloca): Declare arg as size_t.
 
-       * sysdep.c: Remove redundant include of unistd.h, stdlib.h.  Use
-       HAVE_DECL_SYS_SIGLIST, not SYS_SIGLIST_DECLARED.
+       * sysdep.c: Remove redundant include of unistd.h, stdlib.h.
+       Use HAVE_DECL_SYS_SIGLIST, not SYS_SIGLIST_DECLARED.
 
 2003-06-11  Dave Love  <fx@gnu.org>
 
@@ -55,8 +75,8 @@
        Changes to merge with gnulib version and be consistent with the
        autoconf test:
 
-       * getloadavg.c: Set NLIST_STRUCT from HAVE_NLIST_H.  Use
-       HAVE_STRUCT_NLIST_N_UN_N_NAME, not NLIST_NAME_UNION.
+       * getloadavg.c: Set NLIST_STRUCT from HAVE_NLIST_H.
+       Use HAVE_STRUCT_NLIST_N_UN_N_NAME, not NLIST_NAME_UNION.
        [HAVE_LOCALE_H]: Include locale.h.
        (getloadavg) [HAVE_SETLOCALE]: Run sscanf in C locale.
 

diff --git a/src/alloc.c b/src/alloc.c
index 391d63691c6a3a6a18d3e18440c40dc4cd2468cf..53513a722b96d0d50884a11172b2a27ef6d34f02 100644 (file)
--- a/src/alloc.c
+++ b/src/alloc.c
@@ -249,7 +249,7 @@ Lisp_Object Vgc_elapsed;    /* accumulated elapsed time in GC  */
 EMACS_INT gcs_done;            /* accumulated GCs  */
 
 static void mark_buffer P_ ((Lisp_Object));
-static void mark_kboards P_ ((void));
+extern void mark_kboards P_ ((void));
 static void gc_sweep P_ ((void));
 static void mark_glyph_matrix P_ ((struct glyph_matrix *));
 static void mark_face_cache P_ ((struct face_cache *));
@@ -4964,34 +4964,6 @@ mark_buffer (buf)
 }
 
 
-/* Mark the pointers in the kboard objects.  */
-
-static void
-mark_kboards ()
-{
-  KBOARD *kb;
-  Lisp_Object *p;
-  for (kb = all_kboards; kb; kb = kb->next_kboard)
-    {
-      if (kb->kbd_macro_buffer)
-       for (p = kb->kbd_macro_buffer; p < kb->kbd_macro_ptr; p++)
-         mark_object (p);
-      mark_object (&kb->Voverriding_terminal_local_map);
-      mark_object (&kb->Vlast_command);
-      mark_object (&kb->Vreal_last_command);
-      mark_object (&kb->Vprefix_arg);
-      mark_object (&kb->Vlast_prefix_arg);
-      mark_object (&kb->kbd_queue);
-      mark_object (&kb->defining_kbd_macro);
-      mark_object (&kb->Vlast_kbd_macro);
-      mark_object (&kb->Vsystem_key_alist);
-      mark_object (&kb->system_key_syms);
-      mark_object (&kb->Vdefault_minibuffer_frame);
-      mark_object (&kb->echo_string);
-    }
-}
-
-
 /* Value is non-zero if OBJ will survive the current GC because it's
    either marked or does not need to be marked to survive.  */