# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 781270796 0
# Node ID 945ddb4e9e246d2f6cb8043452de7dbd9cce2433
# Parent  df555d80f0932318edcdbf70f6a80d7fc950caab
(write_abbrev, Finsert_abbrev_table_description): Use new accessor macros
instead of calling XSET directly.

diff -r df555d80f093 -r 945ddb4e9e24 src/abbrev.c
--- a/src/abbrev.c	Tue Oct 04 10:42:48 1994 +0000
+++ b/src/abbrev.c	Tue Oct 04 11:39:56 1994 +0000
@@ -377,7 +377,7 @@
   if (NILP (XSYMBOL (sym)->value))
     return;
   insert ("    (", 5);
-  XSET (name, Lisp_String, XSYMBOL (sym)->name);
+  XSETSTRING (name, XSYMBOL (sym)->name);
   Fprin1 (name, stream);
   insert (" ", 1);
   Fprin1 (XSYMBOL (sym)->value, stream);
@@ -429,7 +429,7 @@
   table = Fsymbol_value (name);
   CHECK_VECTOR (table, 0);
 
-  XSET (stream, Lisp_Buffer, current_buffer);
+  XSETBUFFER (stream, current_buffer);
 
   if (!NILP (readable))
     {