(gobble_input): Block SIGALRM if we are using it.

This commit is contained in:
Richard M. Stallman 1994-09-13 04:13:32 +00:00
parent eadcb02c53
commit 81931ba19a

View file

@ -3415,7 +3415,7 @@ get_input_pending (addr)
*addr = !NILP (Vquit_flag) || readable_events ();
}
/* Interface to read_avail_input, blocking SIGIO if necessary. */
/* Interface to read_avail_input, blocking SIGIO or SIGALRM if necessary. */
int
gobble_input (expected)
@ -3431,6 +3431,16 @@ gobble_input (expected)
sigsetmask (mask);
}
else
#endif
#ifdef POLL_FOR_INPUT
if (read_socket_hook && !interrupt_input && poll_suppress_count == 0)
{
SIGMASKTYPE mask;
mask = sigblockx (SIGALRM);
read_avail_input (expected);
sigsetmask (mask);
}
else
#endif
read_avail_input (expected);
#endif