static void debug_parse(char *string, const char *error)
{
if (*string && strchr("~@&", *string))
{
char *text = string + 1;
const char *end;
if (*text == '"')
{
end = parse_string(text, '\n');
dc_output(1, text, -1);
}
else
{
dc_output(1, string, -1);
end = NULL;
}
if (error)
dc_error("%s, ignoring to EOLN", error);
else if (!end)
dc_error("\" expected");
else if (g_str_has_prefix(string, "~^(Scope)#07"))
on_inspect_signal(string + 12);
}
else if (!strcmp(string, "(gdb) ")) /* gdb.info says "(gdb)" */
{
dc_output(3, "(gdb) ", 6);
wait_prompt = wait_result;
}
else
{
char *message;
for (message = string; isdigit(*message); message++);
if (error || option_library_messages || !g_str_has_prefix(message, "=library-"))
dc_output_nl(1, string, -1);
if (*message == '^')
{
iff (wait_result, "extra result")
wait_result--;
}
if (*string == '0' && message > string + 1)
{
memmove(string, string + 1, message - string - 1);
message[-1] = '\0';
}
else
string = NULL; /* no token */
if (error)
dc_error("%s, ignoring to EOLN", error);
else
parse_message(message, string);
}
}
void dc_error(const char *format, ...)
{
char *string;
va_list args;
va_start(args, format);
string = g_strdup_vprintf(format, args);
va_end(args);
dc_output_nl(4, string, -1);
g_free(string);
plugin_blink();
}
