# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 781287352 0
# Node ID 0dceca89f9781a568d7d642535f65981780acb95
# Parent  e6759002383ceb7ed773091be390ea1abcc0984a
(record_delete, record_first_change): Don't use XFASTINT as an lvalue.

diff -r e6759002383c -r 0dceca89f978 src/undo.c
--- a/src/undo.c	Tue Oct 04 16:14:59 1994 +0000
+++ b/src/undo.c	Tue Oct 04 16:15:52 1994 +0000
@@ -111,9 +111,9 @@
   if (point == beg + length)
     XSETINT (sbeg, -beg);
   else
-    XFASTINT (sbeg) = beg;
-  XFASTINT (lbeg) = beg;
-  XFASTINT (lend) = beg + length;
+    XSETFASTINT (sbeg, beg);
+  XSETFASTINT (lbeg, beg);
+  XSETFASTINT (lend, beg + length);
 
   /* If we are just after an undo boundary, and 
      point wasn't at start of deleted range, record where it was.  */
@@ -154,8 +154,8 @@
     Fundo_boundary ();
   XSETBUFFER (last_undo_buffer, current_buffer);
 
-  XFASTINT (high) = (current_buffer->modtime >> 16) & 0xffff;
-  XFASTINT (low) = current_buffer->modtime & 0xffff;
+  XSETFASTINT (high, (current_buffer->modtime >> 16) & 0xffff);
+  XSETFASTINT (low, current_buffer->modtime & 0xffff);
   current_buffer->undo_list = Fcons (Fcons (Qt, Fcons (high, low)), current_buffer->undo_list);
 }