# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 781289139 0
# Node ID bcf42f7e049aa1e4ac0042662e45e943fb5519e5
# Parent  6f07f6dfe1ee57b31522b2c4538d9f8a5bb83c3b
(compute_char_face): Don't use XFASTINT as an lvalue.

diff -r 6f07f6dfe1ee -r bcf42f7e049a src/xfaces.c
--- a/src/xfaces.c	Tue Oct 04 16:44:49 1994 +0000
+++ b/src/xfaces.c	Tue Oct 04 16:45:39 1994 +0000
@@ -813,7 +813,7 @@
   if (pos < region_beg && region_beg < endpos)
     endpos = region_beg;
 
-  XFASTINT (position) = pos;
+  XSETFASTINT (position, pos);
 
   if (mouse)
     propname = Qmouse_face;
@@ -825,7 +825,7 @@
   {
     Lisp_Object limit1, end;
 
-    XFASTINT (limit1) = (limit < endpos ? limit : endpos);
+    XSETFASTINT (limit1, (limit < endpos ? limit : endpos));
     end = Fnext_single_property_change (position, propname, w->buffer, limit1);
     if (INTEGERP (end))
       endpos = XINT (end);