# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 781272199 0
# Node ID 9338a124ea84b1e7a9e93f12ba97b618c28bd3c5
# Parent  cda13734e32cb41e1ffd72a058d6a163bcb87c3a
(redraw_frame, Fsleep_for, sit_for, Fsit_for): Use new accessor macros instead
of calling XSET directly.

diff -r cda13734e32c -r 9338a124ea84 src/dispnew.c
--- a/src/dispnew.c	Tue Oct 04 12:01:46 1994 +0000
+++ b/src/dispnew.c	Tue Oct 04 12:03:19 1994 +0000
@@ -186,7 +186,7 @@
      FRAME_PTR f;
 {
   Lisp_Object frame;
-  XSET (frame, Lisp_Frame, f);
+  XSETFRAME (frame, f);
   Fredraw_frame (frame);
 }
 
@@ -2163,7 +2163,7 @@
   int sec, usec;
 
   if (NILP (milliseconds))
-    XSET (milliseconds, Lisp_Int, 0);
+    XSETINT (milliseconds, 0);
   else
     CHECK_NUMBER (milliseconds, 1);
   usec = XINT (milliseconds) * 1000;
@@ -2269,7 +2269,7 @@
   gobble_input (0);
 #endif
 
-  XSET (read_kbd, Lisp_Int, reading ? -1 : 1);
+  XSETINT (read_kbd, reading ? -1 : 1);
   wait_reading_process_input (sec, usec, read_kbd, display);
 
 
@@ -2318,7 +2318,7 @@
   int sec, usec;
 
   if (NILP (milliseconds))
-    XSET (milliseconds, Lisp_Int, 0);
+    XSETINT (milliseconds, 0);
   else
     CHECK_NUMBER (milliseconds, 1);
   usec = XINT (milliseconds) * 1000;