changeset 9337:7b933936a676

(input_signal_count): New variable. (XTread_socket): Increment it. (x_make_frame_visible): Exit final loop when XTread_sockets has run.

--- a/src/xterm.c	Tue Oct 04 19:37:55 1994 +0000
+++ b/src/xterm.c	Tue Oct 04 19:38:53 1994 +0000
@@ -288,6 +288,13 @@
 /* Nonzero means defer mouse-motion highlighting.  */
 static int mouse_face_defer;
 
+/* Incremented by XTread_socket whenever it really tries to read events.  */
+#ifdef __STDC__
+static int volatile input_signal_count;
+#else
+static int input_signal_count;
+#endif
+
 /* `t' if a mouse button is depressed. */
 
 extern Lisp_Object Vmouse_depressed;
@@ -3166,7 +3173,10 @@
 
   interrupt_input_pending = 0;
   BLOCK_INPUT;
-	
+
+  /* So people can tell when we have read the available input.  */
+  input_signal_count++;
+
   if (numchars <= 0)
     abort ();			/* Don't think this happens. */
 
@@ -4905,7 +4915,6 @@
     x_lower_frame (f);
 }
 
-
 /* Change from withdrawn state to mapped state,
    or deiconify. */
 
@@ -4941,17 +4950,28 @@
 
   XFlushQueue ();
 
-  UNBLOCK_INPUT;
-
   /* Synchronize to ensure Emacs knows the frame is visible
      before we do anything else.  We do this loop with input not blocked
      so that incoming events are handled.  */
   {
     Lisp_Object frame;
+    int count = input_signal_count;
+
+    /* This must come after we set COUNT.  */
+    UNBLOCK_INPUT;
+
     XSET (frame, Lisp_Frame, f);
-    while (! f->async_visible)
+
+    while (1)
       {
 	x_sync (frame);
+	/* Once we have handled input events,
+	   we should have received the MapNotify if one is coming.
+	   So if we have not got it yet, stop looping.
+	   Some window managers make their own decisions
+	   about visibility.  */
+	if (input_signal_count != count)
+	  break;
 	/* Machines that do polling rather than SIGIO have been observed
 	   to go into a busy-wait here.  So we'll fake an alarm signal
 	   to let the handler know that there's something to be read.
@@ -4964,6 +4984,13 @@
 	    alarm (0);
 	    input_poll_signal ();
 	  }
+	/* Once we have handled input events,
+	   we should have received the MapNotify if one is coming.
+	   So if we have not got it yet, stop looping.
+	   Some window managers make their own decisions
+	   about visibility.  */
+	if (input_signal_count != count)
+	  break;
       }
     FRAME_SAMPLE_VISIBILITY (f);
   }