int main() {
try {
none n = throw_it();
} catch (int ex) {
return 0;
}
}
void expr_error_undef (Token t, int w)
{
if (intfind (undeftree, t)) dothrow (0);
union ival i;
intadd (&undeftree, t, i);
fprintf (errstream, EER"Un%s '%s'\n", w ? "declared function" : "defined object", expand (t));
throw_it (0);
}
CEXCEPT_EXPORT void
cexcept_throw_error (int error, const char *fmt, ...)
{
va_list args;
va_start (args, fmt);
throw_it (RETURN_ERROR, error, fmt, args);
va_end (args);
}
void
throw_error (enum errors error, const char *fmt, ...)
{
va_list args;
va_start (args, fmt);
throw_it (RETURN_ERROR, error, fmt, args);
va_end (args);
}
void expr_warntt (char *description, Token t1, Token t2)
{
fprintf (errstream, WARN"%s `%s' `%s'\n", description, expand (t1), expand (t2));
throw_it (1);
}
void expr_warn (char *description)
{
fprintf (errstream, WARN"%s\n", description);
throw_it (1);
}
void expr_errortt (char *description, Token t1, Token t2)
{
fprintf (errstream, EER"%s `%s' `%s'\n", description, expand (t1), expand (t2));
throw_it (0);
}
void expr_error (char *description)
{
fprintf (errstream, EER"%s\n", description);
throw_it (0);
}
void
throw_vquit (const char *fmt, va_list ap)
{
throw_it (RETURN_QUIT, GDB_NO_ERROR, fmt, ap);
}
void
throw_verror (enum errors error, const char *fmt, va_list ap)
{
throw_it (RETURN_ERROR, error, fmt, ap);
}
CEXCEPT_EXPORT void
cexcept_throw_vfatal (const char *fmt, va_list ap)
{
throw_it (RETURN_QUIT, CEXCEPT_NO_ERROR, fmt, ap);
}
CEXCEPT_EXPORT void
cexcept_throw_verror (int error, const char *fmt, va_list ap)
{
throw_it (RETURN_ERROR, error, fmt, ap);
}