diff src/window.c @ 26164:d39ec0a27081

more XCAR/XCDR/XFLOAT_DATA uses, to help isolete lisp engine
author Ken Raeburn <raeburn@raeburn.org>
date Mon, 25 Oct 1999 04:58:18 +0000
parents da4e7625a62d
children af8d605cbcf1
line wrap: on
line diff
--- a/src/window.c	Mon Oct 25 04:50:39 1999 +0000
+++ b/src/window.c	Mon Oct 25 04:58:18 1999 +0000
@@ -4836,13 +4836,13 @@
   /* Check widths < 0 and translate a zero width to nil.
      Margins that are too wide have to be checked elsewhere.  */
   if ((INTEGERP (left) && XINT (left) < 0)
-      || (FLOATP (left) && XFLOAT (left)->data <= 0))
+      || (FLOATP (left) && XFLOAT_DATA (left) <= 0))
      XSETFASTINT (left, 0);
   if (INTEGERP (left) && XFASTINT (left) == 0)
     left = Qnil;
   
   if ((INTEGERP (right) && XINT (right) < 0)
-      || (FLOATP (right) && XFLOAT (right)->data <= 0))
+      || (FLOATP (right) && XFLOAT_DATA (right) <= 0))
     XSETFASTINT (right, 0);
   if (INTEGERP (right) && XFASTINT (right) == 0)
     right = Qnil;