1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
|
/* Selftest support for diagnostics.
Copyright (C) 2016-2024 Free Software Foundation, Inc.
This file is part of GCC.
GCC is free software; you can redistribute it and/or modify it under
the terms of the GNU General Public License as published by the Free
Software Foundation; either version 3, or (at your option) any later
version.
GCC is distributed in the hope that it will be useful, but WITHOUT ANY
WARRANTY; without even the implied warranty of MERCHANTABILITY or
FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
for more details.
You should have received a copy of the GNU General Public License
along with GCC; see the file COPYING3. If not see
<http://www.gnu.org/licenses/>. */
#include "config.h"
#include "system.h"
#include "coretypes.h"
#include "diagnostic.h"
#include "selftest.h"
#include "selftest-diagnostic.h"
/* The selftest code should entirely disappear in a production
configuration, hence we guard all of it with #if CHECKING_P. */
#if CHECKING_P
namespace selftest {
/* Implementation of class selftest::test_diagnostic_context. */
test_diagnostic_context::test_diagnostic_context ()
{
diagnostic_initialize (this, 0);
pp_show_color (m_printer) = false;
m_source_printing.enabled = true;
m_source_printing.show_labels_p = true;
m_show_column = true;
diagnostic_start_span (this) = start_span_cb;
m_source_printing.min_margin_width = 6;
m_source_printing.max_width = 80;
}
test_diagnostic_context::~test_diagnostic_context ()
{
diagnostic_finish (this);
}
/* Implementation of diagnostic_start_span_fn, hiding the
real filename (to avoid printing the names of tempfiles). */
void
test_diagnostic_context::
start_span_cb (const diagnostic_location_print_policy &loc_policy,
pretty_printer *pp,
expanded_location exploc)
{
exploc.file = "FILENAME";
default_diagnostic_start_span_fn (loc_policy, pp, exploc);
}
bool
test_diagnostic_context::report (diagnostic_t kind,
rich_location &richloc,
const diagnostic_metadata *metadata,
int option,
const char * fmt, ...)
{
va_list ap;
va_start (ap, fmt);
begin_group ();
bool result = diagnostic_impl (&richloc, metadata, option, fmt, &ap, kind);
end_group ();
va_end (ap);
return result;
}
/* Print RICHLOC's source and annotations to this context's m_printer.
Return the text buffer from the printer. */
const char *
test_diagnostic_context::test_show_locus (rich_location &richloc)
{
gcc_assert (m_printer);
diagnostic_source_print_policy source_policy (*this);
source_policy.print (*m_printer, richloc, DK_ERROR, nullptr);
return pp_formatted_text (m_printer);
}
} // namespace selftest
#endif /* #if CHECKING_P */
|