mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2025-01-08 15:35:02 +00:00
(x_fully_uncatch_errors, x_catching_errors): New functions.
This commit is contained in:
parent
88019a6328
commit
e6feb692fb
17
src/xterm.c
17
src/xterm.c
@ -7590,6 +7590,23 @@ x_clear_errors (dpy)
|
||||
x_error_message->string[0] = 0;
|
||||
}
|
||||
|
||||
/* Close off all unclosed x_catch_errors calls. */
|
||||
|
||||
void
|
||||
x_fully_uncatch_errors ()
|
||||
{
|
||||
while (x_error_message)
|
||||
x_uncatch_errors ();
|
||||
}
|
||||
|
||||
/* Nonzero if x_catch_errors has been done and not yet canceled. */
|
||||
|
||||
int
|
||||
x_catching_errors ()
|
||||
{
|
||||
return x_error_message != 0;
|
||||
}
|
||||
|
||||
#if 0
|
||||
static unsigned int x_wire_count;
|
||||
x_trace_wire ()
|
||||
|
Loading…
Reference in New Issue
Block a user