diff src/frame.c @ 485:8c615e453683

*** empty log message ***

--- a/src/frame.c	Mon Jan 13 21:48:03 1992 +0000
+++ b/src/frame.c	Mon Jan 13 21:48:08 1992 +0000
@@ -163,7 +163,7 @@
     {
       XWINDOW (mini_window)->buffer = Qt;
       Fset_window_buffer (mini_window,
-			  (NULL (Vminibuffer_list)
+			  (NILP (Vminibuffer_list)
 			   ? get_minibuffer (0)
 			   : Fcar (Vminibuffer_list)));
     }
@@ -190,7 +190,7 @@
   register struct screen *s;
 
   /* Choose the minibuffer window to use.  */
-  if (NULL (mini_window))
+  if (NILP (mini_window))
     {
       if (XTYPE (Vdefault_minibuffer_screen) != Lisp_Screen)
 	error ("default-minibuffer-screen must be set when creating minibufferless screens.");
@@ -207,7 +207,7 @@
   /* Install the chosen minibuffer window, with proper buffer.  */
   s->minibuffer_window = mini_window;
   Fset_window_buffer (mini_window,
-		      (NULL (Vminibuffer_list)
+		      (NILP (Vminibuffer_list)
 		       ? get_minibuffer (0)
 		       : Fcar (Vminibuffer_list)));
   return s;
@@ -246,7 +246,7 @@
   /* Put the proper buffer in that window.  */
 
   Fset_window_buffer (mini_window,
-		      (NULL (Vminibuffer_list)
+		      (NILP (Vminibuffer_list)
 		       ? get_minibuffer (0)
 		       : Fcar (Vminibuffer_list)));
   return s;
@@ -289,7 +289,7 @@
 #ifdef HAVE_X_WINDOWS
 #ifdef MULTI_SCREEN
   if (XSCREEN (screen)->output_method == output_x_window
-      && NULL (no_enter))
+      && NILP (no_enter))
     {
       Ffocus_screen (screen);
     }
@@ -323,7 +323,7 @@
   (screen)
      Lisp_Object screen;
 {
-  if (NULL (screen))
+  if (NILP (screen))
     XSET (screen, Lisp_Screen, selected_screen);
   else
     CHECK_LIVE_SCREEN (screen, 0);
@@ -337,7 +337,7 @@
   (screen)
      Lisp_Object screen;
 {
-  if (NULL (screen))
+  if (NILP (screen))
     XSET (screen, Lisp_Screen, selected_screen);
   else
     CHECK_LIVE_SCREEN (screen, 0);
@@ -381,7 +381,7 @@
 
 	    /* Decide whether this screen is eligible to be returned,
 	       according to minibuf.  */
-	    if ((NULL (minibuf) && ! SCREEN_MINIBUF_ONLY_P (XSCREEN (s)))
+	    if ((NILP (minibuf) && ! SCREEN_MINIBUF_ONLY_P (XSCREEN (s)))
 		|| XTYPE (minibuf) != Lisp_Window
 		|| EQ (SCREEN_MINIBUF_WINDOW (XSCREEN (s)), minibuf)
 		|| EQ (s, screen))
@@ -420,18 +420,18 @@
 	  if (XTYPE (scr) != Lisp_Screen)
 	    abort ();
 
-	  if (EQ (screen, scr) && !NULL (prev))
+	  if (EQ (screen, scr) && !NILP (prev))
 	    return prev;
 
 	  /* Decide whether this screen is eligible to be returned,
 	     according to minibuf.  */
-	  if ((NULL (minibuf) && ! SCREEN_MINIBUF_ONLY_P (XSCREEN (scr)))
+	  if ((NILP (minibuf) && ! SCREEN_MINIBUF_ONLY_P (XSCREEN (scr)))
 	      || XTYPE (minibuf) != Lisp_Window
 	      || EQ (SCREEN_MINIBUF_WINDOW (XSCREEN (scr)), minibuf))
 	    prev = scr;
 	}
 
-      if (NULL (prev))
+      if (NILP (prev))
 	/* We went through the whole screen list without finding a single
 	   acceptable screen.  Return the original screen.  */
 	prev = screen;
@@ -450,7 +450,7 @@
 {
   Lisp_Object tail;
 
-  if (NULL (screen))
+  if (NILP (screen))
     XSET (screen, Lisp_Screen, selected_screen);
   else
     CHECK_LIVE_SCREEN (screen, 0);
@@ -760,7 +760,7 @@
 {
   CHECK_LIVE_SCREEN (screen, 0);
 
-  if (NULL (focus_screen))
+  if (NILP (focus_screen))
     focus_screen = screen;
   else
     CHECK_LIVE_SCREEN (focus_screen, 1);
@@ -941,7 +941,7 @@
   register struct screen *s;
 
   CHECK_NUMBER (rows, 0);
-  if (NULL (screen))
+  if (NILP (screen))
     s = selected_screen;
   else
     {
@@ -955,7 +955,7 @@
 	x_set_window_size (s, s->width, XINT (rows));
     }
   else
-    change_screen_size (s, XINT (rows), 0, !NULL (pretend));
+    change_screen_size (s, XINT (rows), 0, !NILP (pretend));
   return Qnil;
 }
 
@@ -968,7 +968,7 @@
 {
   register struct screen *s;
   CHECK_NUMBER (cols, 0);
-  if (NULL (screen))
+  if (NILP (screen))
     s = selected_screen;
   else
     {
@@ -982,7 +982,7 @@
 	x_set_window_size (s, XINT (cols), s->height);
     }
   else
-    change_screen_size (selected_screen, 0, XINT (cols), !NULL (pretend));
+    change_screen_size (selected_screen, 0, XINT (cols), !NILP (pretend));
   return Qnil;
 }