+ ds_put_format (&s, "%s: ", msg_severity_to_string (m->severity));
+
+ if (m->category == MSG_C_SYNTAX && m->command_name != NULL)
+ ds_put_format (&s, "%s: ", m->command_name);
+
+ ds_put_cstr (&s, m->text);
+
+ const struct msg_location *loc = m->location;
+ if (m->category != MSG_C_GENERAL
+ && loc->src && loc->start.line && loc->start.column
+ && msg_handler.lex_source_get_line)
+ {
+ int l0 = loc->start.line;
+ int l1 = loc->end.line;
+ int nl = l1 - l0;
+ for (int ln = l0; ln <= l1; ln++)
+ {
+ if (nl > 3 && ln == l0 + 2)
+ {
+ ds_put_cstr (&s, "\n ... |");
+ ln = l1;
+ }
+
+ struct substring line = msg_handler.lex_source_get_line (
+ loc->src, ln);
+ ss_rtrim (&line, ss_cstr ("\n\r"));
+
+ ds_put_format (&s, "\n%5d | ", ln);
+ ds_put_substring (&s, line);
+
+ int c0 = ln == l0 ? loc->start.column : 1;
+ int c1 = ln == l1 ? loc->end.column : ss_utf8_count_columns (line);
+ if (c0 > 0 && c1 >= c0)
+ {
+ ds_put_cstr (&s, "\n |");
+ ds_put_byte_multiple (&s, ' ', c0);
+ if (ln == l0)
+ {
+ ds_put_byte (&s, '^');
+ if (c1 > c0)
+ ds_put_byte_multiple (&s, '~', c1 - c0);
+ }
+ else
+ ds_put_byte_multiple (&s, '-', c1 - c0 + 1);
+ }
+ }
+ }
+
+ return ds_cstr (&s);
+}
+\f
+
+/* Number of messages reported, by severity level. */
+static int counts[MSG_N_SEVERITIES];
+
+/* True after the maximum number of errors or warnings has been exceeded. */
+static bool too_many_errors;
+
+/* True after the maximum number of notes has been exceeded. */
+static bool too_many_notes;
+
+/* True iff warnings have been explicitly disabled (MXWARNS = 0) */
+static bool warnings_off = false;
+
+/* Checks whether we've had so many errors that it's time to quit
+ processing this syntax file. */
+bool
+msg_ui_too_many_errors (void)
+{
+ return too_many_errors;