111
|
1 /* Test of cpp_callbacks::comments. */
|
|
2
|
|
3 #include "gcc-plugin.h"
|
|
4 #include "config.h"
|
|
5 #include "system.h"
|
|
6 #include "coretypes.h"
|
|
7 #include "cpplib.h"
|
|
8 #include "diagnostic.h"
|
|
9 #include "c-family/c-pragma.h"
|
|
10
|
|
11 int plugin_is_GPL_compatible;
|
|
12
|
|
13 /* Test callback for cpp_callbacks::comments. */
|
|
14
|
|
15 void
|
145
|
16 my_comment_cb (cpp_reader *, location_t loc,
|
111
|
17 const unsigned char *content, size_t len)
|
|
18 {
|
|
19 if (in_system_header_at (loc))
|
|
20 return;
|
|
21
|
|
22 /* CONTENT contains the opening slash-star (or slash-slash),
|
|
23 and for C-style comments contains the closing star-slash. */
|
|
24 gcc_assert (len >= 2);
|
|
25 gcc_assert (content[0] == '/');
|
|
26 gcc_assert (content[1] == '*' || content[1] == '/');
|
|
27 bool c_style = (content[1] == '*');
|
|
28 if (c_style)
|
|
29 {
|
|
30 gcc_assert (content[len - 2] == '*');
|
|
31 gcc_assert (content[len - 1] == '/');
|
|
32 }
|
|
33
|
|
34 if (c_style)
|
|
35 inform (loc, "got C-style comment; length=%i", len);
|
|
36 else
|
|
37 inform (loc, "got C++-style comment; length=%i", len);
|
|
38
|
|
39 /* Print the content of the comment.
|
|
40 For a C-style comment, the buffer CONTENT contains the opening
|
|
41 slash-star and closing star-slash, so we can't directly verify
|
|
42 it in the DejaGnu test without adding another comment, which
|
|
43 would trigger this callback again.
|
|
44 Hence we skip the syntactically-significant parts of the comment
|
|
45 when printing it. */
|
|
46 fprintf (stderr, "stripped content of comment: >");
|
|
47 /* Avoid printing trailing star-slash. */
|
|
48 if (c_style)
|
|
49 len -= 2;
|
|
50 for (size_t i = 2; i < len; i++)
|
|
51 fputc (content[i], stderr);
|
|
52 fprintf (stderr, "<\n");
|
|
53 }
|
|
54
|
|
55 int
|
|
56 plugin_init (struct plugin_name_args *plugin_info,
|
|
57 struct plugin_gcc_version *version)
|
|
58 {
|
|
59 cpp_callbacks *cb = cpp_get_callbacks (parse_in);
|
|
60 cb->comment = my_comment_cb;
|
|
61
|
|
62 return 0;
|
|
63 }
|