Commit 1ce3dc2b authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(interrupt_handle): New variable.

(init_crit): Initialize it.
(delete_crit): Cleanup on exit.
(signal_quit): New function.  Signal any threads that are blocked
on a "system" call (provided they have been specially written to
check for this), so the call can fail with EINTR as on Unix.
parent 85348a17
......@@ -33,6 +33,7 @@ Boston, MA 02111-1307, USA. */
extern HANDLE keyboard_handle;
HANDLE input_available = NULL;
HANDLE interrupt_handle = NULL;
init_crit ()
......@@ -42,6 +43,14 @@ init_crit ()
/* For safety, input_available should only be reset by get_next_msg
when the input queue is empty, so make it a manual reset event. */
keyboard_handle = input_available = CreateEvent (NULL, TRUE, FALSE, NULL);
/* interrupt_handle is signalled when quit (C-g) is detected, so that
blocking system calls can be interrupted. We make it a manual
reset event, so that if we should ever have multiple threads
performing system calls, they will all be interrupted (I'm guessing
that would the right response). Note that we use PulseEvent to
signal this event, so that it never remains signalled. */
interrupt_handle = CreateEvent (NULL, TRUE, FALSE, NULL);
......@@ -54,6 +63,19 @@ delete_crit ()
CloseHandle (input_available);
input_available = NULL;
if (interrupt_handle)
CloseHandle (interrupt_handle);
interrupt_handle = NULL;
signal_quit ()
/* Make sure this event never remains signalled; if the main thread
isn't in a blocking call, then this should do nothing. */
PulseEvent (interrupt_handle);
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment