diff src/intervals.c @ 9271:1971a6a8cdc0

(graft_intervals_into_buffer): Use new accessor macros instead of calling XSET directly.

--- a/src/intervals.c	Tue Oct 04 12:09:34 1994 +0000
+++ b/src/intervals.c	Tue Oct 04 12:10:17 1994 +0000
@@ -1434,7 +1434,7 @@
       Lisp_Object buf;
       if (!inherit && ! NULL_INTERVAL_P (tree))
 	{
-	  XSET (buf, Lisp_Buffer, buffer);
+	  XSETBUFFER (buf, buffer);
 	  Fset_text_properties (make_number (position),
 				make_number (position + length),
 				Qnil, buf);
@@ -1451,7 +1451,7 @@
       if ((BUF_Z (buffer) - BUF_BEG (buffer)) == TOTAL_LENGTH (source))
 	{
 	  Lisp_Object buf;
-	  XSET (buf, Lisp_Buffer, buffer);
+	  XSETBUFFER (buf, buffer);
 	  buffer->intervals = reproduce_tree (source, buf);
 	  /* Explicitly free the old tree here.  */
 
@@ -1462,7 +1462,7 @@
 	 of the intervals of the inserted string.  */
       {
 	Lisp_Object buf;
-	XSET (buf, Lisp_Buffer, buffer);
+	XSETBUFFER (buf, buffer);
 	tree = create_root_interval (buf);
       }
     }