diff src/frame.c @ 40656:cdfd4d09b79a

Update usage of CHECK_ macros (remove unused second argument).
author Pavel Jan?k <Pavel@Janik.cz>
date Fri, 02 Nov 2001 20:46:55 +0000
parents c73c1890d989
children e44a82a4871e
line wrap: on
line diff
--- a/src/frame.c	Fri Nov 02 20:14:02 2001 +0000
+++ b/src/frame.c	Fri Nov 02 20:46:55 2001 +0000
@@ -337,7 +337,7 @@
   struct gcpro gcpro1;
 
   if (!NILP (mini_window))
-    CHECK_LIVE_WINDOW (mini_window, 0);
+    CHECK_LIVE_WINDOW (mini_window);
 
 #ifdef MULTI_KBOARD
   if (!NILP (mini_window)
@@ -579,7 +579,7 @@
   /* This used to say CHECK_LIVE_FRAME, but apparently it's possible for
      a switch-frame event to arrive after a frame is no longer live,
      especially when deleting the initial frame during startup.  */
-  CHECK_FRAME (frame, 0);
+  CHECK_FRAME (frame);
   if (! FRAME_LIVE_P (XFRAME (frame)))
     return Qnil;
 
@@ -703,7 +703,7 @@
      (window)
      Lisp_Object window;
 {
-  CHECK_LIVE_WINDOW (window, 0);
+  CHECK_LIVE_WINDOW (window);
   return XWINDOW (window)->frame;
 }
 
@@ -719,7 +719,7 @@
     w = SELECTED_FRAME ()->root_window;
   else
     {
-      CHECK_LIVE_FRAME (frame, 0);
+      CHECK_LIVE_FRAME (frame);
       w = XFRAME (frame)->root_window;
     }
   while (NILP (XWINDOW (w)->buffer))
@@ -754,7 +754,7 @@
     window = SELECTED_FRAME ()->root_window;
   else
     {
-      CHECK_LIVE_FRAME (frame, 0);
+      CHECK_LIVE_FRAME (frame);
       window = XFRAME (frame)->root_window;
     }
   
@@ -774,7 +774,7 @@
     window = SELECTED_FRAME ()->selected_window;
   else
     {
-      CHECK_LIVE_FRAME (frame, 0);
+      CHECK_LIVE_FRAME (frame);
       window = XFRAME (frame)->selected_window;
     }
 
@@ -792,8 +792,8 @@
   if (NILP (frame))
     frame = selected_frame;
   
-  CHECK_LIVE_FRAME (frame, 0);
-  CHECK_LIVE_WINDOW (window, 1);
+  CHECK_LIVE_FRAME (frame);
+  CHECK_LIVE_WINDOW (window);
 
   if (! EQ (frame, WINDOW_FRAME (XWINDOW (window))))
     error ("In `set-frame-selected-window', WINDOW is not on FRAME");
@@ -840,7 +840,7 @@
 
   /* If this frame is dead, it won't be in Vframe_list, and we'll loop
      forever.  Forestall that.  */
-  CHECK_LIVE_FRAME (frame, 0);
+  CHECK_LIVE_FRAME (frame);
 
   while (1)
     for (tail = Vframe_list; CONSP (tail); tail = XCDR (tail))
@@ -992,7 +992,7 @@
   if (NILP (frame))
     frame = selected_frame;
   
-  CHECK_LIVE_FRAME (frame, 0);
+  CHECK_LIVE_FRAME (frame);
   return next_frame (frame, miniframe);
 }
 
@@ -1012,7 +1012,7 @@
 {
   if (NILP (frame))
     frame = selected_frame;
-  CHECK_LIVE_FRAME (frame, 0);
+  CHECK_LIVE_FRAME (frame);
   return prev_frame (frame, miniframe);
 }
 
@@ -1084,7 +1084,7 @@
     }
   else
     {
-      CHECK_FRAME (frame, 0);
+      CHECK_FRAME (frame);
       f = XFRAME (frame);
     }
 
@@ -1404,9 +1404,9 @@
   (frame, x, y)
      Lisp_Object frame, x, y;
 {
-  CHECK_LIVE_FRAME (frame, 0);
-  CHECK_NUMBER (x, 2);
-  CHECK_NUMBER (y, 1);
+  CHECK_LIVE_FRAME (frame);
+  CHECK_NUMBER (x);
+  CHECK_NUMBER (y);
 
   /* I think this should be done with a hook.  */
 #ifdef HAVE_WINDOW_SYSTEM
@@ -1436,9 +1436,9 @@
   (frame, x, y)
      Lisp_Object frame, x, y;
 {
-  CHECK_LIVE_FRAME (frame, 0);
-  CHECK_NUMBER (x, 2);
-  CHECK_NUMBER (y, 1);
+  CHECK_LIVE_FRAME (frame);
+  CHECK_NUMBER (x);
+  CHECK_NUMBER (y);
 
   /* I think this should be done with a hook.  */
 #ifdef HAVE_WINDOW_SYSTEM
@@ -1470,7 +1470,7 @@
   if (NILP (frame))
     frame = selected_frame;
 
-  CHECK_LIVE_FRAME (frame, 0);
+  CHECK_LIVE_FRAME (frame);
 
   /* I think this should be done with a hook.  */
 #ifdef HAVE_WINDOW_SYSTEM
@@ -1524,7 +1524,7 @@
   if (NILP (frame))
     frame = selected_frame;
 
-  CHECK_LIVE_FRAME (frame, 0);
+  CHECK_LIVE_FRAME (frame);
 
   if (NILP (force) && !other_visible_frames (XFRAME (frame)))
     error ("Attempt to make invisible the sole visible or iconified frame");
@@ -1566,7 +1566,7 @@
   if (NILP (frame))
     frame = selected_frame;
   
-  CHECK_LIVE_FRAME (frame, 0);
+  CHECK_LIVE_FRAME (frame);
 
 #if 0 /* This isn't logically necessary, and it can do GC.  */
   /* Don't let the frame remain selected.  */
@@ -1604,7 +1604,7 @@
      (frame)
      Lisp_Object frame;
 {
-  CHECK_LIVE_FRAME (frame, 0);
+  CHECK_LIVE_FRAME (frame);
 
   FRAME_SAMPLE_VISIBILITY (XFRAME (frame));
 
@@ -1650,7 +1650,7 @@
   if (NILP (frame))
     frame = selected_frame;
 
-  CHECK_LIVE_FRAME (frame, 0);
+  CHECK_LIVE_FRAME (frame);
 
   /* Do like the documentation says. */
   Fmake_frame_visible (frame);
@@ -1673,7 +1673,7 @@
   if (NILP (frame))
     frame = selected_frame;
 
-  CHECK_LIVE_FRAME (frame, 0);
+  CHECK_LIVE_FRAME (frame);
   
   if (frame_raise_lower_hook)
     (*frame_raise_lower_hook) (XFRAME (frame), 0);
@@ -1713,10 +1713,10 @@
   /* Note that we don't check for a live frame here.  It's reasonable
      to redirect the focus of a frame you're about to delete, if you
      know what other frame should receive those keystrokes.  */
-  CHECK_FRAME (frame, 0);
+  CHECK_FRAME (frame);
 
   if (! NILP (focus_frame))
-    CHECK_LIVE_FRAME (focus_frame, 1);
+    CHECK_LIVE_FRAME (focus_frame);
 
   XFRAME (frame)->focus_frame = focus_frame;
 
@@ -1734,7 +1734,7 @@
      (frame)
      Lisp_Object frame;
 {
-  CHECK_LIVE_FRAME (frame, 0);
+  CHECK_LIVE_FRAME (frame);
 
   return FRAME_FOCUS_FRAME (XFRAME (frame));
 }
@@ -1879,7 +1879,7 @@
     }
   else
     {
-      CHECK_STRING (name, 0);
+      CHECK_STRING (name);
 
       /* Don't change the name if it's already NAME.  */
       if (! NILP (Fstring_equal (name, f->name)))
@@ -1976,7 +1976,7 @@
   if (NILP (frame))
     frame = selected_frame;
 
-  CHECK_FRAME (frame, 0);
+  CHECK_FRAME (frame);
   f = XFRAME (frame);
 
   if (!FRAME_LIVE_P (f))
@@ -2071,8 +2071,8 @@
   if (NILP (frame))
     frame = selected_frame;
   else
-    CHECK_FRAME (frame, 0);
-  CHECK_SYMBOL (parameter, 1);
+    CHECK_FRAME (frame);
+  CHECK_SYMBOL (parameter);
   
   f = XFRAME (frame);
   value = Qnil;
@@ -2166,7 +2166,7 @@
 
   if (EQ (frame, Qnil))
     frame = selected_frame;
-  CHECK_LIVE_FRAME (frame, 0);
+  CHECK_LIVE_FRAME (frame);
   f = XFRAME (frame);
 
   /* I think this should be done with a hook.  */
@@ -2226,7 +2226,7 @@
 
   if (NILP (frame))
     frame = selected_frame;
-  CHECK_FRAME (frame, 0);
+  CHECK_FRAME (frame);
   f = XFRAME (frame);
 
 #ifdef HAVE_WINDOW_SYSTEM
@@ -2252,7 +2252,7 @@
 
   if (NILP (frame))
     frame = selected_frame;
-  CHECK_FRAME (frame, 0);
+  CHECK_FRAME (frame);
   f = XFRAME (frame);
 
 #ifdef HAVE_WINDOW_SYSTEM
@@ -2277,7 +2277,7 @@
 
   if (NILP (frame))
     frame = selected_frame;
-  CHECK_FRAME (frame, 0);
+  CHECK_FRAME (frame);
   f = XFRAME (frame);
 
 #ifdef HAVE_WINDOW_SYSTEM
@@ -2300,7 +2300,7 @@
 
   if (NILP (frame))
     frame = selected_frame;
-  CHECK_FRAME (frame, 0);
+  CHECK_FRAME (frame);
   f = XFRAME (frame);
 
 #ifdef HAVE_WINDOW_SYSTEM
@@ -2320,10 +2320,10 @@
 {
   register struct frame *f;
 
-  CHECK_NUMBER (lines, 0);
+  CHECK_NUMBER (lines);
   if (NILP (frame))
     frame = selected_frame;
-  CHECK_LIVE_FRAME (frame, 0);
+  CHECK_LIVE_FRAME (frame);
   f = XFRAME (frame);
 
   /* I think this should be done with a hook.  */
@@ -2348,10 +2348,10 @@
      Lisp_Object frame, cols, pretend;
 {
   register struct frame *f;
-  CHECK_NUMBER (cols, 0);
+  CHECK_NUMBER (cols);
   if (NILP (frame))
     frame = selected_frame;
-  CHECK_LIVE_FRAME (frame, 0);
+  CHECK_LIVE_FRAME (frame);
   f = XFRAME (frame);
 
   /* I think this should be done with a hook.  */
@@ -2375,9 +2375,9 @@
 {
   register struct frame *f;
 
-  CHECK_LIVE_FRAME (frame, 0);
-  CHECK_NUMBER (cols, 2);
-  CHECK_NUMBER (rows, 1);
+  CHECK_LIVE_FRAME (frame);
+  CHECK_NUMBER (cols);
+  CHECK_NUMBER (rows);
   f = XFRAME (frame);
 
   /* I think this should be done with a hook.  */
@@ -2407,9 +2407,9 @@
 {
   register struct frame *f;
 
-  CHECK_LIVE_FRAME (frame, 0);
-  CHECK_NUMBER (xoffset, 1);
-  CHECK_NUMBER (yoffset, 2);
+  CHECK_LIVE_FRAME (frame);
+  CHECK_NUMBER (xoffset);
+  CHECK_NUMBER (yoffset);
   f = XFRAME (frame);
 
   /* I think this should be done with a hook.  */