1
0
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:
Richard M. Stallman 2006-03-11 15:20:09 +00:00
parent 88019a6328
commit e6feb692fb

View File

@ -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 ()