Mercurial > emacs
changeset 7916:50e9e0c8806a
(x_noop_count): New variable.
(x_term_init) [X_IO_BUG]: Init it.
(XTread_socket) [X_IO_BUG]: Don't do XNoOp every time, just 1 in 100.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Wed, 15 Jun 1994 20:15:59 +0000 |
parents | 970912d4f413 |
children | 7967c371644f |
files | src/xterm.c |
diffstat | 1 files changed, 23 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/src/xterm.c Wed Jun 15 18:24:10 1994 +0000 +++ b/src/xterm.c Wed Jun 15 20:15:59 1994 +0000 @@ -347,6 +347,11 @@ static Pixmap GreyPixmap = 0; #endif /* ! defined (HAVE_X11) */ +#ifdef X_IO_BUG +static int x_noop_count; +#endif + + /* From time to time we get info on an Emacs window, here. */ static WINDOWINFO_TYPE windowinfo; @@ -4310,10 +4315,20 @@ } #ifdef X_IO_BUG - if (! event_found) - /* On some systems, an X bug causes Emacs to get no more events - when the window is destroyed. Detect that. (1994.) */ - XNoOp (x_current_display); + if (! event_found) + { + /* On some systems, an X bug causes Emacs to get no more events + when the window is destroyed. Detect that. (1994.) */ + /* Emacs and the X Server eats up CPU time if XNoOp is done every time. + One XNOOP in 100 loops will make Emacs terminate. + B. Bretthauer, 1994 */ + x_noop_count++; + if (x_noop_count >= 100) + { + x_noop_count=0; + XNoOp (x_current_display); + } + } #endif /* X_IO_BUG */ #if 0 /* This fails for serial-line connections to the X server, @@ -6078,6 +6093,10 @@ #endif /* ! defined (F_SETOWN) */ #endif /* F_SETOWN_BUG */ +#ifdef X_IO_BUG + x_noop_count = 0; +#endif + x_focus_frame = x_highlight_frame = 0; #ifdef USE_X_TOOLKIT