# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 781272856 0
# Node ID 129621997564500ffc9adba4058f31bd8ac63f4c
# Parent  0a0998c4d4b6be888ee71ef102b802e61a79cf62
(synkey, Fdescribe_bindings, describe_command): Use new accessor macros
instead of calling XSET directly.

diff -r 0a0998c4d4b6 -r 129621997564 src/keymap.c
--- a/src/keymap.c	Tue Oct 04 12:13:17 1994 +0000
+++ b/src/keymap.c	Tue Oct 04 12:14:16 1994 +0000
@@ -163,7 +163,7 @@
      int fromchar, tochar;
 {
   Lisp_Object v, c;
-  XSET (v, Lisp_Vector, tomap);
+  XSETVECTOR (v, tomap);
   XFASTINT (c) = tochar;
   frommap->contents[fromchar] = Fcons (v, c);
 }
@@ -1820,7 +1820,7 @@
      Lisp_Object prefix;
 {
   register Lisp_Object thisbuf;
-  XSET (thisbuf, Lisp_Buffer, current_buffer);
+  XSETBUFFER (thisbuf, current_buffer);
   internal_with_output_to_temp_buffer ("*Help*",
 				       describe_buffer_bindings,
 				       Fcons (thisbuf, prefix));
@@ -2071,7 +2071,7 @@
 
   if (SYMBOLP (definition))
     {
-      XSET (tem1, Lisp_String, XSYMBOL (definition)->name);
+      XSETSTRING (tem1, XSYMBOL (definition)->name);
       insert1 (tem1);
       insert_string ("\n");
     }