Branch data Line data Source code
1 : : /* Implementation of subroutines for the GNU C++ pretty-printer.
2 : : Copyright (C) 2003-2024 Free Software Foundation, Inc.
3 : : Contributed by Gabriel Dos Reis <gdr@integrable-solutions.net>
4 : :
5 : : This file is part of GCC.
6 : :
7 : : GCC is free software; you can redistribute it and/or modify it under
8 : : the terms of the GNU General Public License as published by the Free
9 : : Software Foundation; either version 3, or (at your option) any later
10 : : version.
11 : :
12 : : GCC is distributed in the hope that it will be useful, but WITHOUT ANY
13 : : WARRANTY; without even the implied warranty of MERCHANTABILITY or
14 : : FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
15 : : for more details.
16 : :
17 : : You should have received a copy of the GNU General Public License
18 : : along with GCC; see the file COPYING3. If not see
19 : : <http://www.gnu.org/licenses/>. */
20 : :
21 : : #include "config.h"
22 : : #include "system.h"
23 : : #include "coretypes.h"
24 : : #include "cp-tree.h"
25 : : #include "cxx-pretty-print.h"
26 : : #include "tree-pretty-print.h"
27 : :
28 : : static void pp_cxx_unqualified_id (cxx_pretty_printer *, tree);
29 : : static void pp_cxx_nested_name_specifier (cxx_pretty_printer *, tree);
30 : : static void pp_cxx_qualified_id (cxx_pretty_printer *, tree);
31 : : static void pp_cxx_template_argument_list (cxx_pretty_printer *, tree);
32 : : static void pp_cxx_type_specifier_seq (cxx_pretty_printer *, tree);
33 : : static void pp_cxx_ptr_operator (cxx_pretty_printer *, tree);
34 : : static void pp_cxx_parameter_declaration_clause (cxx_pretty_printer *, tree);
35 : : static void pp_cxx_template_parameter (cxx_pretty_printer *, tree);
36 : : static void pp_cxx_cast_expression (cxx_pretty_printer *, tree);
37 : : static void pp_cxx_typeid_expression (cxx_pretty_printer *, tree);
38 : : static void pp_cxx_unary_left_fold_expression (cxx_pretty_printer *, tree);
39 : : static void pp_cxx_unary_right_fold_expression (cxx_pretty_printer *, tree);
40 : : static void pp_cxx_binary_fold_expression (cxx_pretty_printer *, tree);
41 : : static void pp_cxx_concept_definition (cxx_pretty_printer *, tree);
42 : :
43 : :
44 : : static inline void
45 : 133121366 : pp_cxx_nonconsecutive_character (cxx_pretty_printer *pp, int c)
46 : : {
47 : 133121366 : const char *p = pp_last_position_in_text (pp);
48 : :
49 : 133121366 : if (p != NULL && *p == c)
50 : 18388474 : pp_cxx_whitespace (pp);
51 : 133121366 : pp_character (pp, c);
52 : 133121366 : pp->set_padding (pp_none);
53 : 133121366 : }
54 : :
55 : : #define pp_cxx_expression_list(PP, T) \
56 : : pp_c_expression_list (PP, T)
57 : : #define pp_cxx_space_for_pointer_operator(PP, T) \
58 : : pp_c_space_for_pointer_operator (PP, T)
59 : : #define pp_cxx_init_declarator(PP, T) \
60 : : pp_c_init_declarator (PP, T)
61 : : #define pp_cxx_call_argument_list(PP, T) \
62 : : pp_c_call_argument_list (PP, T)
63 : :
64 : : void
65 : 85716968 : pp_cxx_colon_colon (cxx_pretty_printer *pp)
66 : : {
67 : 85716968 : pp_colon_colon (pp);
68 : 85716968 : pp->set_padding (pp_none);
69 : 85716968 : }
70 : :
71 : : void
72 : 66560683 : pp_cxx_begin_template_argument_list (cxx_pretty_printer *pp)
73 : : {
74 : 66560683 : pp_cxx_nonconsecutive_character (pp, '<');
75 : 66560683 : }
76 : :
77 : : void
78 : 66560683 : pp_cxx_end_template_argument_list (cxx_pretty_printer *pp)
79 : : {
80 : 66560683 : pp_cxx_nonconsecutive_character (pp, '>');
81 : 66560683 : }
82 : :
83 : : void
84 : 43094048 : pp_cxx_separate_with (cxx_pretty_printer *pp, int c)
85 : : {
86 : 43094048 : pp_separate_with (pp, c);
87 : 43094048 : pp->set_padding (pp_none);
88 : 43094048 : }
89 : :
90 : : /* Expressions. */
91 : :
92 : : /* conversion-function-id:
93 : : operator conversion-type-id
94 : :
95 : : conversion-type-id:
96 : : type-specifier-seq conversion-declarator(opt)
97 : :
98 : : conversion-declarator:
99 : : ptr-operator conversion-declarator(opt) */
100 : :
101 : : static inline void
102 : 0 : pp_cxx_conversion_function_id (cxx_pretty_printer *pp, tree t)
103 : : {
104 : 0 : pp_cxx_ws_string (pp, "operator");
105 : 0 : pp_cxx_type_specifier_seq (pp, TREE_TYPE (t));
106 : 0 : }
107 : :
108 : : static inline void
109 : 11226 : pp_cxx_template_id (cxx_pretty_printer *pp, tree t)
110 : : {
111 : 11226 : pp_cxx_unqualified_id (pp, TREE_OPERAND (t, 0));
112 : 11226 : pp_cxx_begin_template_argument_list (pp);
113 : 11226 : pp_cxx_template_argument_list (pp, TREE_OPERAND (t, 1));
114 : 11226 : pp_cxx_end_template_argument_list (pp);
115 : 11226 : }
116 : :
117 : : /* Prints the unqualified part of the id-expression T.
118 : :
119 : : unqualified-id:
120 : : identifier
121 : : operator-function-id
122 : : conversion-function-id
123 : : ~ class-name
124 : : template-id */
125 : :
126 : : static void
127 : 46415056 : pp_cxx_unqualified_id (cxx_pretty_printer *pp, tree t)
128 : : {
129 : 46434943 : enum tree_code code = TREE_CODE (t);
130 : 46434943 : switch (code)
131 : : {
132 : 0 : case RESULT_DECL:
133 : 0 : pp->translate_string ("<return-value>");
134 : 0 : break;
135 : :
136 : : case OVERLOAD:
137 : 45782810 : t = OVL_FIRST (t);
138 : : /* FALLTHRU */
139 : 45782810 : case VAR_DECL:
140 : 45782810 : case PARM_DECL:
141 : 45782810 : case CONST_DECL:
142 : 45782810 : case TYPE_DECL:
143 : 45782810 : case FUNCTION_DECL:
144 : 45782810 : case NAMESPACE_DECL:
145 : 45782810 : case FIELD_DECL:
146 : 45782810 : case LABEL_DECL:
147 : 45782810 : case USING_DECL:
148 : 45782810 : case TEMPLATE_DECL:
149 : 45782810 : t = DECL_NAME (t);
150 : : /* FALLTHRU */
151 : :
152 : 45782810 : case IDENTIFIER_NODE:
153 : 45782810 : if (t == NULL)
154 : 45 : pp->translate_string ("<unnamed>");
155 : 45799154 : else if (IDENTIFIER_CONV_OP_P (t))
156 : 0 : pp_cxx_conversion_function_id (pp, t);
157 : : else
158 : 45799154 : pp_cxx_tree_identifier (pp, t);
159 : : break;
160 : :
161 : 1632 : case TEMPLATE_ID_EXPR:
162 : 1632 : pp_cxx_template_id (pp, t);
163 : 1632 : break;
164 : :
165 : 0 : case BASELINK:
166 : 0 : pp_cxx_unqualified_id (pp, BASELINK_FUNCTIONS (t));
167 : 0 : break;
168 : :
169 : 614126 : case RECORD_TYPE:
170 : 614126 : case UNION_TYPE:
171 : 614126 : case ENUMERAL_TYPE:
172 : 614126 : case TYPENAME_TYPE:
173 : 614126 : case UNBOUND_CLASS_TEMPLATE:
174 : 614126 : pp_cxx_unqualified_id (pp, TYPE_NAME (t));
175 : 614126 : if (tree ti = TYPE_TEMPLATE_INFO_MAYBE_ALIAS (t))
176 : 3209 : if (PRIMARY_TEMPLATE_P (TI_TEMPLATE (ti)))
177 : : {
178 : 3184 : pp_cxx_begin_template_argument_list (pp);
179 : 3184 : tree args = INNERMOST_TEMPLATE_ARGS (TI_ARGS (ti));
180 : 3184 : pp_cxx_template_argument_list (pp, args);
181 : 3184 : pp_cxx_end_template_argument_list (pp);
182 : : }
183 : : break;
184 : :
185 : 0 : case BIT_NOT_EXPR:
186 : 0 : pp_cxx_complement (pp);
187 : 0 : pp_cxx_unqualified_id (pp, TREE_OPERAND (t, 0));
188 : 0 : break;
189 : :
190 : 13617 : case TEMPLATE_TYPE_PARM:
191 : 13617 : case TEMPLATE_TEMPLATE_PARM:
192 : 13617 : if (template_placeholder_p (t))
193 : : {
194 : 0 : t = TREE_TYPE (CLASS_PLACEHOLDER_TEMPLATE (t));
195 : 0 : pp_cxx_unqualified_id (pp, TYPE_IDENTIFIER (t));
196 : 0 : pp_string (pp, "<...auto...>");
197 : : }
198 : 13617 : else if (TYPE_IDENTIFIER (t))
199 : 13518 : pp_cxx_unqualified_id (pp, TYPE_IDENTIFIER (t));
200 : : else
201 : 99 : pp_cxx_canonical_template_parameter (pp, t);
202 : : break;
203 : :
204 : 6369 : case TEMPLATE_PARM_INDEX:
205 : 6369 : pp_cxx_unqualified_id (pp, TEMPLATE_PARM_DECL (t));
206 : 6369 : break;
207 : :
208 : 0 : case BOUND_TEMPLATE_TEMPLATE_PARM:
209 : 0 : pp_cxx_cv_qualifier_seq (pp, t);
210 : 0 : pp_cxx_unqualified_id (pp, TYPE_IDENTIFIER (t));
211 : 0 : pp_cxx_begin_template_argument_list (pp);
212 : 0 : pp_cxx_template_argument_list (pp, TYPE_TI_ARGS (t));
213 : 0 : pp_cxx_end_template_argument_list (pp);
214 : 0 : break;
215 : :
216 : 0 : default:
217 : 0 : pp_unsupported_tree (pp, t);
218 : 0 : break;
219 : : }
220 : 46415056 : }
221 : :
222 : : /* Pretty-print out the token sequence ":: template" in template codes
223 : : where it is needed to "inline declare" the (following) member as
224 : : a template. This situation arises when SCOPE of T is dependent
225 : : on template parameters. */
226 : :
227 : : static inline void
228 : 1301190 : pp_cxx_template_keyword_if_needed (cxx_pretty_printer *pp, tree scope, tree t)
229 : : {
230 : 1301190 : if (TREE_CODE (t) == TEMPLATE_ID_EXPR
231 : 1301190 : && TYPE_P (scope) && dependent_type_p (scope))
232 : 0 : pp_cxx_ws_string (pp, "template");
233 : 1301190 : }
234 : :
235 : : /* nested-name-specifier:
236 : : class-or-namespace-name :: nested-name-specifier(opt)
237 : : class-or-namespace-name :: template nested-name-specifier */
238 : :
239 : : static void
240 : 1304020 : pp_cxx_nested_name_specifier (cxx_pretty_printer *pp, tree t)
241 : : {
242 : : /* FIXME: When diagnosing references to concepts (especially as types?)
243 : : we end up adding too many '::' to the name. This is partially due
244 : : to the fact that pp->enclosing_namespace is null. */
245 : 1304020 : if (t == global_namespace)
246 : : {
247 : 372 : pp_cxx_colon_colon (pp);
248 : : }
249 : 1303648 : else if (!SCOPE_FILE_SCOPE_P (t) && t != pp->enclosing_scope)
250 : : {
251 : 648919 : tree scope = get_containing_scope (t);
252 : 648919 : pp_cxx_nested_name_specifier (pp, scope);
253 : 648919 : pp_cxx_template_keyword_if_needed (pp, scope, t);
254 : 648919 : pp_cxx_unqualified_id (pp, t);
255 : 648919 : pp_cxx_colon_colon (pp);
256 : : }
257 : 1304020 : }
258 : :
259 : : /* qualified-id:
260 : : nested-name-specifier template(opt) unqualified-id */
261 : :
262 : : static void
263 : 652839 : pp_cxx_qualified_id (cxx_pretty_printer *pp, tree t)
264 : : {
265 : 652839 : switch (TREE_CODE (t))
266 : : {
267 : : /* A pointer-to-member is always qualified. */
268 : 0 : case PTRMEM_CST:
269 : 0 : pp_cxx_nested_name_specifier (pp, PTRMEM_CST_CLASS (t));
270 : 0 : pp_cxx_unqualified_id (pp, PTRMEM_CST_MEMBER (t));
271 : 0 : break;
272 : :
273 : : /* In Standard C++, functions cannot possibly be used as
274 : : nested-name-specifiers. However, there are situations where
275 : : is "makes sense" to output the surrounding function name for the
276 : : purpose of emphasizing on the scope kind. Just printing the
277 : : function name might not be sufficient as it may be overloaded; so,
278 : : we decorate the function with its signature too.
279 : : FIXME: This is probably the wrong pretty-printing for conversion
280 : : functions and some function templates. */
281 : : case OVERLOAD:
282 : 44 : t = OVL_FIRST (t);
283 : : /* FALLTHRU */
284 : 44 : case FUNCTION_DECL:
285 : 44 : if (DECL_FUNCTION_MEMBER_P (t))
286 : 2 : pp_cxx_nested_name_specifier (pp, DECL_CONTEXT (t));
287 : 44 : pp_cxx_unqualified_id
288 : 88 : (pp, DECL_CONSTRUCTOR_P (t) ? DECL_CONTEXT (t) : t);
289 : 44 : pp_cxx_parameter_declaration_clause (pp, TREE_TYPE (t));
290 : 44 : break;
291 : :
292 : 70 : case OFFSET_REF:
293 : 70 : case SCOPE_REF:
294 : 70 : pp_cxx_nested_name_specifier (pp, TREE_OPERAND (t, 0));
295 : 70 : pp_cxx_unqualified_id (pp, TREE_OPERAND (t, 1));
296 : 70 : break;
297 : :
298 : 652725 : default:
299 : 652725 : {
300 : 652725 : tree scope = get_containing_scope (t);
301 : 652725 : if (scope != pp->enclosing_scope)
302 : : {
303 : 652271 : pp_cxx_nested_name_specifier (pp, scope);
304 : 652271 : pp_cxx_template_keyword_if_needed (pp, scope, t);
305 : : }
306 : 652725 : pp_cxx_unqualified_id (pp, t);
307 : : }
308 : 652725 : break;
309 : : }
310 : 652839 : }
311 : :
312 : : /* Given a value e of ENUMERAL_TYPE:
313 : : Print out the first ENUMERATOR id with value e, if one is found,
314 : : (including nested names but excluding the enum name if unscoped)
315 : : else print out the value as a C-style cast (type-id)value. */
316 : :
317 : : static void
318 : 611034 : pp_cxx_enumeration_constant (cxx_pretty_printer *pp, tree e)
319 : : {
320 : 611034 : tree type = TREE_TYPE (e);
321 : 611034 : tree value = NULL_TREE;
322 : :
323 : : /* Find the name of this constant. */
324 : 611034 : if ((pp->flags & pp_c_flag_gnu_v3) == 0)
325 : 2314 : for (value = TYPE_VALUES (type); value != NULL_TREE;
326 : 1460 : value = TREE_CHAIN (value))
327 : 2314 : if (tree_int_cst_equal (DECL_INITIAL (TREE_VALUE (value)), e))
328 : : break;
329 : :
330 : 854 : if (value != NULL_TREE)
331 : : {
332 : 854 : if (!ENUM_IS_SCOPED (type))
333 : 832 : type = get_containing_scope (type);
334 : 854 : pp_cxx_nested_name_specifier (pp, type);
335 : 854 : pp->id_expression (TREE_PURPOSE (value));
336 : : }
337 : : else
338 : : {
339 : : /* Value must have been cast. */
340 : 610180 : pp_c_type_cast (pp, type);
341 : 610180 : pp_c_integer_constant (pp, e);
342 : : }
343 : 611034 : }
344 : :
345 : :
346 : : void
347 : 12709422 : cxx_pretty_printer::constant (tree t)
348 : : {
349 : 12709422 : switch (TREE_CODE (t))
350 : : {
351 : 518 : case STRING_CST:
352 : 518 : {
353 : 518 : const bool in_parens = PAREN_STRING_LITERAL_P (t);
354 : 518 : if (in_parens)
355 : 7 : pp_cxx_left_paren (this);
356 : 518 : c_pretty_printer::constant (t);
357 : 518 : if (in_parens)
358 : 7 : pp_cxx_right_paren (this);
359 : : }
360 : : break;
361 : :
362 : 12708200 : case INTEGER_CST:
363 : 12708200 : if (NULLPTR_TYPE_P (TREE_TYPE (t)))
364 : : {
365 : 6 : pp_string (this, "nullptr");
366 : 6 : break;
367 : : }
368 : 12708194 : else if (TREE_CODE (TREE_TYPE (t)) == ENUMERAL_TYPE)
369 : : {
370 : 611034 : pp_cxx_enumeration_constant (this, t);
371 : 611034 : break;
372 : : }
373 : : /* fall through. */
374 : :
375 : 12097864 : default:
376 : 12097864 : c_pretty_printer::constant (t);
377 : 12097864 : break;
378 : : }
379 : 12709422 : }
380 : :
381 : : /* id-expression:
382 : : unqualified-id
383 : : qualified-id */
384 : :
385 : : void
386 : 44507113 : cxx_pretty_printer::id_expression (tree t)
387 : : {
388 : 44507113 : if (TREE_CODE (t) == OVERLOAD)
389 : 44507113 : t = OVL_FIRST (t);
390 : 44507113 : if (DECL_P (t) && DECL_CONTEXT (t))
391 : 40937 : pp_cxx_qualified_id (this, t);
392 : : else
393 : 44466176 : pp_cxx_unqualified_id (this, t);
394 : 44507113 : }
395 : :
396 : : /* user-defined literal:
397 : : literal ud-suffix */
398 : :
399 : : void
400 : 0 : pp_cxx_userdef_literal (cxx_pretty_printer *pp, tree t)
401 : : {
402 : 0 : pp->constant (USERDEF_LITERAL_VALUE (t));
403 : 0 : pp->id_expression (USERDEF_LITERAL_SUFFIX_ID (t));
404 : 0 : }
405 : :
406 : :
407 : : /* primary-expression:
408 : : literal
409 : : this
410 : : :: identifier
411 : : :: operator-function-id
412 : : :: qualifier-id
413 : : ( expression )
414 : : id-expression
415 : :
416 : : GNU Extensions:
417 : : __builtin_va_arg ( assignment-expression , type-id )
418 : : __builtin_offsetof ( type-id, offsetof-expression )
419 : : __builtin_addressof ( expression )
420 : :
421 : : __has_nothrow_assign ( type-id )
422 : : __has_nothrow_constructor ( type-id )
423 : : __has_nothrow_copy ( type-id )
424 : : __has_trivial_assign ( type-id )
425 : : __has_trivial_constructor ( type-id )
426 : : __has_trivial_copy ( type-id )
427 : : __has_unique_object_representations ( type-id )
428 : : __has_trivial_destructor ( type-id )
429 : : __has_virtual_destructor ( type-id )
430 : : __is_abstract ( type-id )
431 : : __is_base_of ( type-id , type-id )
432 : : __is_class ( type-id )
433 : : __is_empty ( type-id )
434 : : __is_enum ( type-id )
435 : : __is_literal_type ( type-id )
436 : : __is_pod ( type-id )
437 : : __is_polymorphic ( type-id )
438 : : __is_std_layout ( type-id )
439 : : __is_trivial ( type-id )
440 : : __is_union ( type-id ) */
441 : :
442 : : void
443 : 12467 : cxx_pretty_printer::primary_expression (tree t)
444 : : {
445 : 12467 : switch (TREE_CODE (t))
446 : : {
447 : 50 : case VOID_CST:
448 : 50 : case INTEGER_CST:
449 : 50 : case REAL_CST:
450 : 50 : case COMPLEX_CST:
451 : 50 : case STRING_CST:
452 : 50 : constant (t);
453 : 50 : break;
454 : :
455 : 0 : case USERDEF_LITERAL:
456 : 0 : pp_cxx_userdef_literal (this, t);
457 : 0 : break;
458 : :
459 : 0 : case BASELINK:
460 : 0 : t = BASELINK_FUNCTIONS (t);
461 : : /* FALLTHRU */
462 : 2467 : case VAR_DECL:
463 : 2467 : case PARM_DECL:
464 : 2467 : case FIELD_DECL:
465 : 2467 : case FUNCTION_DECL:
466 : 2467 : case OVERLOAD:
467 : 2467 : case CONST_DECL:
468 : 2467 : case TEMPLATE_DECL:
469 : 2467 : id_expression (t);
470 : 2467 : break;
471 : :
472 : 6369 : case RESULT_DECL:
473 : 6369 : case TEMPLATE_TYPE_PARM:
474 : 6369 : case TEMPLATE_TEMPLATE_PARM:
475 : 6369 : case TEMPLATE_PARM_INDEX:
476 : 6369 : pp_cxx_unqualified_id (this, t);
477 : 6369 : break;
478 : :
479 : 0 : case STMT_EXPR:
480 : 0 : pp_cxx_left_paren (this);
481 : 0 : statement (STMT_EXPR_STMT (t));
482 : 0 : pp_cxx_right_paren (this);
483 : 0 : break;
484 : :
485 : 66 : case TRAIT_EXPR:
486 : 66 : pp_cxx_trait (this, t);
487 : 66 : break;
488 : :
489 : 0 : case VA_ARG_EXPR:
490 : 0 : pp_cxx_va_arg_expression (this, t);
491 : 0 : break;
492 : :
493 : 0 : case OFFSETOF_EXPR:
494 : 0 : pp_cxx_offsetof_expression (this, t);
495 : 0 : break;
496 : :
497 : 0 : case ADDRESSOF_EXPR:
498 : 0 : pp_cxx_addressof_expression (this, t);
499 : 0 : break;
500 : :
501 : 184 : case REQUIRES_EXPR:
502 : 184 : pp_cxx_requires_expr (this, t);
503 : 184 : break;
504 : :
505 : 3331 : default:
506 : 3331 : c_pretty_printer::primary_expression (t);
507 : 3331 : break;
508 : : }
509 : 12467 : }
510 : :
511 : : /* postfix-expression:
512 : : primary-expression
513 : : postfix-expression [ expression ]
514 : : postfix-expression ( expression-list(opt) )
515 : : simple-type-specifier ( expression-list(opt) )
516 : : typename ::(opt) nested-name-specifier identifier ( expression-list(opt) )
517 : : typename ::(opt) nested-name-specifier template(opt)
518 : : template-id ( expression-list(opt) )
519 : : postfix-expression . template(opt) ::(opt) id-expression
520 : : postfix-expression -> template(opt) ::(opt) id-expression
521 : : postfix-expression . pseudo-destructor-name
522 : : postfix-expression -> pseudo-destructor-name
523 : : postfix-expression ++
524 : : postfix-expression --
525 : : dynamic_cast < type-id > ( expression )
526 : : static_cast < type-id > ( expression )
527 : : reinterpret_cast < type-id > ( expression )
528 : : const_cast < type-id > ( expression )
529 : : typeid ( expression )
530 : : typeid ( type-id ) */
531 : :
532 : : void
533 : 8413 : cxx_pretty_printer::postfix_expression (tree t)
534 : : {
535 : 8415 : enum tree_code code = TREE_CODE (t);
536 : :
537 : 8415 : switch (code)
538 : : {
539 : 2845 : case AGGR_INIT_EXPR:
540 : 2845 : case CALL_EXPR:
541 : 2845 : {
542 : 2845 : tree fun = cp_get_callee (t);
543 : 2845 : tree saved_scope = enclosing_scope;
544 : 2845 : bool skipfirst = false;
545 : 2845 : tree arg;
546 : :
547 : 2845 : if (TREE_CODE (fun) == ADDR_EXPR)
548 : 2 : fun = TREE_OPERAND (fun, 0);
549 : :
550 : : /* In templates, where there is no way to tell whether a given
551 : : call uses an actual member function. So the parser builds
552 : : FUN as a COMPONENT_REF or a plain IDENTIFIER_NODE until
553 : : instantiation time. */
554 : 2845 : if (TREE_CODE (fun) != FUNCTION_DECL)
555 : : ;
556 : 44 : else if (DECL_OBJECT_MEMBER_FUNCTION_P (fun))
557 : : {
558 : 2 : tree object = (code == AGGR_INIT_EXPR
559 : 4 : ? (AGGR_INIT_VIA_CTOR_P (t)
560 : 2 : ? AGGR_INIT_EXPR_SLOT (t)
561 : 0 : : AGGR_INIT_EXPR_ARG (t, 0))
562 : 0 : : CALL_EXPR_ARG (t, 0));
563 : :
564 : 2 : while (TREE_CODE (object) == NOP_EXPR)
565 : 0 : object = TREE_OPERAND (object, 0);
566 : :
567 : 2 : if (TREE_CODE (object) == ADDR_EXPR)
568 : 0 : object = TREE_OPERAND (object, 0);
569 : :
570 : 2 : if (!TYPE_PTR_P (TREE_TYPE (object)))
571 : : {
572 : 2 : postfix_expression (object);
573 : 2 : pp_cxx_dot (this);
574 : : }
575 : : else
576 : : {
577 : 0 : postfix_expression (object);
578 : 0 : pp_cxx_arrow (this);
579 : : }
580 : 2 : skipfirst = true;
581 : 2 : enclosing_scope = strip_pointer_operator (TREE_TYPE (object));
582 : : }
583 : :
584 : 2845 : postfix_expression (fun);
585 : 2845 : enclosing_scope = saved_scope;
586 : 2845 : pp_cxx_left_paren (this);
587 : 2845 : if (code == AGGR_INIT_EXPR)
588 : : {
589 : 2 : aggr_init_expr_arg_iterator iter;
590 : 6 : FOR_EACH_AGGR_INIT_EXPR_ARG (arg, iter, t)
591 : : {
592 : 2 : if (skipfirst)
593 : : skipfirst = false;
594 : : else
595 : : {
596 : 0 : expression (arg);
597 : 0 : if (more_aggr_init_expr_args_p (&iter))
598 : 0 : pp_cxx_separate_with (this, ',');
599 : : }
600 : : }
601 : : }
602 : : else
603 : : {
604 : 2843 : call_expr_arg_iterator iter;
605 : 7016 : FOR_EACH_CALL_EXPR_ARG (arg, iter, t)
606 : : {
607 : 1330 : if (skipfirst)
608 : : skipfirst = false;
609 : : else
610 : : {
611 : 1330 : expression (arg);
612 : 1330 : if (more_call_expr_args_p (&iter))
613 : 3 : pp_cxx_separate_with (this, ',');
614 : : }
615 : : }
616 : : }
617 : 2845 : pp_cxx_right_paren (this);
618 : : }
619 : 2847 : if (code == AGGR_INIT_EXPR && AGGR_INIT_VIA_CTOR_P (t))
620 : : {
621 : 2 : pp_cxx_separate_with (this, ',');
622 : 2 : postfix_expression (AGGR_INIT_EXPR_SLOT (t));
623 : : }
624 : : break;
625 : :
626 : 1826 : case BASELINK:
627 : 1826 : case VAR_DECL:
628 : 1826 : case PARM_DECL:
629 : 1826 : case FIELD_DECL:
630 : 1826 : case FUNCTION_DECL:
631 : 1826 : case OVERLOAD:
632 : 1826 : case CONST_DECL:
633 : 1826 : case TEMPLATE_DECL:
634 : 1826 : case RESULT_DECL:
635 : 1826 : primary_expression (t);
636 : 1826 : break;
637 : :
638 : 0 : case DYNAMIC_CAST_EXPR:
639 : 0 : case STATIC_CAST_EXPR:
640 : 0 : case REINTERPRET_CAST_EXPR:
641 : 0 : case CONST_CAST_EXPR:
642 : 0 : if (code == DYNAMIC_CAST_EXPR)
643 : 0 : pp_cxx_ws_string (this, "dynamic_cast");
644 : 0 : else if (code == STATIC_CAST_EXPR)
645 : 0 : pp_cxx_ws_string (this, "static_cast");
646 : 0 : else if (code == REINTERPRET_CAST_EXPR)
647 : 0 : pp_cxx_ws_string (this, "reinterpret_cast");
648 : : else
649 : 0 : pp_cxx_ws_string (this, "const_cast");
650 : 0 : pp_cxx_begin_template_argument_list (this);
651 : 0 : type_id (TREE_TYPE (t));
652 : 0 : pp_cxx_end_template_argument_list (this);
653 : 0 : pp_left_paren (this);
654 : 0 : expression (TREE_OPERAND (t, 0));
655 : 0 : pp_right_paren (this);
656 : 0 : break;
657 : :
658 : 0 : case BIT_CAST_EXPR:
659 : 0 : pp_cxx_ws_string (this, "__builtin_bit_cast");
660 : 0 : pp_left_paren (this);
661 : 0 : type_id (TREE_TYPE (t));
662 : 0 : pp_comma (this);
663 : 0 : expression (TREE_OPERAND (t, 0));
664 : 0 : pp_right_paren (this);
665 : 0 : break;
666 : :
667 : 0 : case EMPTY_CLASS_EXPR:
668 : 0 : type_id (TREE_TYPE (t));
669 : 0 : pp_left_paren (this);
670 : 0 : pp_right_paren (this);
671 : 0 : break;
672 : :
673 : 3 : case TYPEID_EXPR:
674 : 3 : pp_cxx_typeid_expression (this, t);
675 : 3 : break;
676 : :
677 : 0 : case PSEUDO_DTOR_EXPR:
678 : 0 : postfix_expression (TREE_OPERAND (t, 0));
679 : 0 : pp_cxx_dot (this);
680 : 0 : if (TREE_OPERAND (t, 1))
681 : : {
682 : 0 : pp_cxx_qualified_id (this, TREE_OPERAND (t, 1));
683 : 0 : pp_cxx_colon_colon (this);
684 : : }
685 : 0 : pp_complement (this);
686 : 0 : pp_cxx_unqualified_id (this, TREE_OPERAND (t, 2));
687 : 0 : break;
688 : :
689 : 0 : case ARROW_EXPR:
690 : 0 : postfix_expression (TREE_OPERAND (t, 0));
691 : 0 : pp_cxx_arrow (this);
692 : 0 : break;
693 : :
694 : 3741 : default:
695 : 3741 : c_pretty_printer::postfix_expression (t);
696 : 3741 : break;
697 : : }
698 : 8413 : }
699 : :
700 : : /* new-expression:
701 : : ::(opt) new new-placement(opt) new-type-id new-initializer(opt)
702 : : ::(opt) new new-placement(opt) ( type-id ) new-initializer(opt)
703 : :
704 : : new-placement:
705 : : ( expression-list )
706 : :
707 : : new-type-id:
708 : : type-specifier-seq new-declarator(opt)
709 : :
710 : : new-declarator:
711 : : ptr-operator new-declarator(opt)
712 : : direct-new-declarator
713 : :
714 : : direct-new-declarator
715 : : [ expression ]
716 : : direct-new-declarator [ constant-expression ]
717 : :
718 : : new-initializer:
719 : : ( expression-list(opt) ) */
720 : :
721 : : static void
722 : 6 : pp_cxx_new_expression (cxx_pretty_printer *pp, tree t)
723 : : {
724 : 6 : enum tree_code code = TREE_CODE (t);
725 : 6 : tree type = TREE_OPERAND (t, 1);
726 : 6 : tree init = TREE_OPERAND (t, 2);
727 : 6 : switch (code)
728 : : {
729 : 6 : case NEW_EXPR:
730 : 6 : case VEC_NEW_EXPR:
731 : 6 : if (NEW_EXPR_USE_GLOBAL (t))
732 : 4 : pp_cxx_colon_colon (pp);
733 : 6 : pp_cxx_ws_string (pp, "new");
734 : 6 : if (TREE_OPERAND (t, 0))
735 : : {
736 : 4 : pp_cxx_call_argument_list (pp, TREE_OPERAND (t, 0));
737 : 4 : pp_space (pp);
738 : : }
739 : 6 : if (TREE_CODE (type) == ARRAY_REF)
740 : 0 : type = build_cplus_array_type
741 : 0 : (TREE_OPERAND (type, 0),
742 : : build_index_type (fold_build2_loc (input_location,
743 : : MINUS_EXPR, integer_type_node,
744 : 0 : TREE_OPERAND (type, 1),
745 : : integer_one_node)));
746 : 6 : pp->type_id (type);
747 : 6 : if (init)
748 : : {
749 : 0 : pp_left_paren (pp);
750 : 0 : if (TREE_CODE (init) == TREE_LIST)
751 : 0 : pp_c_expression_list (pp, init);
752 : 0 : else if (init == void_node)
753 : : ; /* OK, empty initializer list. */
754 : : else
755 : 0 : pp->expression (init);
756 : 0 : pp_right_paren (pp);
757 : : }
758 : : break;
759 : :
760 : 0 : default:
761 : 0 : pp_unsupported_tree (pp, t);
762 : : }
763 : 6 : }
764 : :
765 : : /* delete-expression:
766 : : ::(opt) delete cast-expression
767 : : ::(opt) delete [ ] cast-expression */
768 : :
769 : : static void
770 : 15 : pp_cxx_delete_expression (cxx_pretty_printer *pp, tree t)
771 : : {
772 : 15 : enum tree_code code = TREE_CODE (t);
773 : 15 : switch (code)
774 : : {
775 : 15 : case DELETE_EXPR:
776 : 15 : case VEC_DELETE_EXPR:
777 : 15 : if (DELETE_EXPR_USE_GLOBAL (t))
778 : 0 : pp_cxx_colon_colon (pp);
779 : 15 : pp_cxx_ws_string (pp, "delete");
780 : 15 : pp_space (pp);
781 : 15 : if (code == VEC_DELETE_EXPR
782 : 15 : || DELETE_EXPR_USE_VEC (t))
783 : : {
784 : 6 : pp_left_bracket (pp);
785 : 6 : pp_right_bracket (pp);
786 : 6 : pp_space (pp);
787 : : }
788 : 15 : pp_c_cast_expression (pp, TREE_OPERAND (t, 0));
789 : 15 : break;
790 : :
791 : 0 : default:
792 : 0 : pp_unsupported_tree (pp, t);
793 : : }
794 : 15 : }
795 : :
796 : : /* unary-expression:
797 : : postfix-expression
798 : : ++ cast-expression
799 : : -- cast-expression
800 : : unary-operator cast-expression
801 : : sizeof unary-expression
802 : : sizeof ( type-id )
803 : : sizeof ... ( identifier )
804 : : new-expression
805 : : delete-expression
806 : :
807 : : unary-operator: one of
808 : : * & + - !
809 : :
810 : : GNU extensions:
811 : : __alignof__ unary-expression
812 : : __alignof__ ( type-id ) */
813 : :
814 : : void
815 : 3114 : cxx_pretty_printer::unary_expression (tree t)
816 : : {
817 : 3123 : enum tree_code code = TREE_CODE (t);
818 : 3123 : switch (code)
819 : : {
820 : 0 : case NEW_EXPR:
821 : 0 : case VEC_NEW_EXPR:
822 : 0 : pp_cxx_new_expression (this, t);
823 : 0 : break;
824 : :
825 : 0 : case DELETE_EXPR:
826 : 0 : case VEC_DELETE_EXPR:
827 : 0 : pp_cxx_delete_expression (this, t);
828 : 0 : break;
829 : :
830 : 119 : case SIZEOF_EXPR:
831 : 119 : if (PACK_EXPANSION_P (TREE_OPERAND (t, 0)))
832 : : {
833 : 26 : pp_cxx_ws_string (this, "sizeof");
834 : 26 : pp_cxx_ws_string (this, "...");
835 : 26 : pp_cxx_whitespace (this);
836 : 26 : pp_cxx_left_paren (this);
837 : 26 : if (TYPE_P (TREE_OPERAND (t, 0)))
838 : 26 : type_id (TREE_OPERAND (t, 0));
839 : : else
840 : 0 : unary_expression (TREE_OPERAND (t, 0));
841 : 26 : pp_cxx_right_paren (this);
842 : 26 : break;
843 : : }
844 : : /* Fall through */
845 : :
846 : 97 : case ALIGNOF_EXPR:
847 : 97 : if (code == SIZEOF_EXPR)
848 : 93 : pp_cxx_ws_string (this, "sizeof");
849 : 4 : else if (ALIGNOF_EXPR_STD_P (t))
850 : 4 : pp_cxx_ws_string (this, "alignof");
851 : : else
852 : 0 : pp_cxx_ws_string (this, "__alignof__");
853 : 97 : pp_cxx_whitespace (this);
854 : 97 : if (TREE_CODE (t) == SIZEOF_EXPR && SIZEOF_EXPR_TYPE_P (t))
855 : : {
856 : 0 : pp_cxx_left_paren (this);
857 : 0 : type_id (TREE_TYPE (TREE_OPERAND (t, 0)));
858 : 0 : pp_cxx_right_paren (this);
859 : : }
860 : 97 : else if (TYPE_P (TREE_OPERAND (t, 0)))
861 : : {
862 : 88 : pp_cxx_left_paren (this);
863 : 88 : type_id (TREE_OPERAND (t, 0));
864 : 88 : pp_cxx_right_paren (this);
865 : : }
866 : : else
867 : 9 : unary_expression (TREE_OPERAND (t, 0));
868 : : break;
869 : :
870 : 0 : case AT_ENCODE_EXPR:
871 : 0 : pp_cxx_ws_string (this, "@encode");
872 : 0 : pp_cxx_whitespace (this);
873 : 0 : pp_cxx_left_paren (this);
874 : 0 : type_id (TREE_OPERAND (t, 0));
875 : 0 : pp_cxx_right_paren (this);
876 : 0 : break;
877 : :
878 : 0 : case NOEXCEPT_EXPR:
879 : 0 : pp_cxx_ws_string (this, "noexcept");
880 : 0 : pp_cxx_whitespace (this);
881 : 0 : pp_cxx_left_paren (this);
882 : 0 : expression (TREE_OPERAND (t, 0));
883 : 0 : pp_cxx_right_paren (this);
884 : 0 : break;
885 : :
886 : 3 : case UNARY_PLUS_EXPR:
887 : 3 : pp_plus (this);
888 : 3 : pp_cxx_cast_expression (this, TREE_OPERAND (t, 0));
889 : 3 : break;
890 : :
891 : 2997 : default:
892 : 2997 : c_pretty_printer::unary_expression (t);
893 : 2997 : break;
894 : : }
895 : 3114 : }
896 : :
897 : : /* cast-expression:
898 : : unary-expression
899 : : ( type-id ) cast-expression */
900 : :
901 : : static void
902 : 1594 : pp_cxx_cast_expression (cxx_pretty_printer *pp, tree t)
903 : : {
904 : 1594 : switch (TREE_CODE (t))
905 : : {
906 : 45 : case CAST_EXPR:
907 : 45 : case IMPLICIT_CONV_EXPR:
908 : 45 : pp->type_id (TREE_TYPE (t));
909 : 45 : pp_cxx_call_argument_list (pp, TREE_OPERAND (t, 0));
910 : 45 : break;
911 : :
912 : 1549 : default:
913 : 1549 : pp_c_cast_expression (pp, t);
914 : 1549 : break;
915 : : }
916 : 1594 : }
917 : :
918 : : /* pm-expression:
919 : : cast-expression
920 : : pm-expression .* cast-expression
921 : : pm-expression ->* cast-expression */
922 : :
923 : : static void
924 : 1547 : pp_cxx_pm_expression (cxx_pretty_printer *pp, tree t)
925 : : {
926 : 1547 : switch (TREE_CODE (t))
927 : : {
928 : : /* Handle unfortunate OFFSET_REF overloading here. */
929 : 0 : case OFFSET_REF:
930 : 0 : if (TYPE_P (TREE_OPERAND (t, 0)))
931 : : {
932 : 0 : pp_cxx_qualified_id (pp, t);
933 : 0 : break;
934 : : }
935 : : /* Fall through. */
936 : 9 : case MEMBER_REF:
937 : 9 : case DOTSTAR_EXPR:
938 : 9 : pp_cxx_pm_expression (pp, TREE_OPERAND (t, 0));
939 : 9 : if (TREE_CODE (t) == MEMBER_REF)
940 : 3 : pp_cxx_arrow (pp);
941 : : else
942 : 6 : pp_cxx_dot (pp);
943 : 9 : pp_star(pp);
944 : 9 : pp_cxx_cast_expression (pp, TREE_OPERAND (t, 1));
945 : 9 : break;
946 : :
947 : :
948 : 1538 : default:
949 : 1538 : pp_cxx_cast_expression (pp, t);
950 : 1538 : break;
951 : : }
952 : 1547 : }
953 : :
954 : : /* multiplicative-expression:
955 : : pm-expression
956 : : multiplicative-expression * pm-expression
957 : : multiplicative-expression / pm-expression
958 : : multiplicative-expression % pm-expression */
959 : :
960 : : void
961 : 1529 : cxx_pretty_printer::multiplicative_expression (tree e)
962 : : {
963 : 1529 : enum tree_code code = TREE_CODE (e);
964 : 1529 : switch (code)
965 : : {
966 : 8 : case MULT_EXPR:
967 : 8 : case TRUNC_DIV_EXPR:
968 : 8 : case TRUNC_MOD_EXPR:
969 : 8 : case EXACT_DIV_EXPR:
970 : 8 : case RDIV_EXPR:
971 : 8 : multiplicative_expression (TREE_OPERAND (e, 0));
972 : 8 : pp_space (this);
973 : 8 : if (code == MULT_EXPR)
974 : 5 : pp_star (this);
975 : 3 : else if (code != TRUNC_MOD_EXPR)
976 : 3 : pp_slash (this);
977 : : else
978 : 0 : pp_modulo (this);
979 : 8 : pp_space (this);
980 : 8 : pp_cxx_pm_expression (this, TREE_OPERAND (e, 1));
981 : 8 : break;
982 : :
983 : 1521 : default:
984 : 1521 : pp_cxx_pm_expression (this, e);
985 : 1521 : break;
986 : : }
987 : 1529 : }
988 : :
989 : : /* conditional-expression:
990 : : logical-or-expression
991 : : logical-or-expression ? expression : assignment-expression */
992 : :
993 : : void
994 : 14 : cxx_pretty_printer::conditional_expression (tree e)
995 : : {
996 : 14 : if (TREE_CODE (e) == COND_EXPR)
997 : : {
998 : 0 : pp_c_logical_or_expression (this, TREE_OPERAND (e, 0));
999 : 0 : pp_space (this);
1000 : 0 : pp_question (this);
1001 : 0 : pp_space (this);
1002 : 0 : expression (TREE_OPERAND (e, 1));
1003 : 0 : pp_space (this);
1004 : 0 : assignment_expression (TREE_OPERAND (e, 2));
1005 : : }
1006 : : else
1007 : 14 : pp_c_logical_or_expression (this, e);
1008 : 14 : }
1009 : :
1010 : : /* Pretty-print a compound assignment operator token as indicated by T. */
1011 : :
1012 : : static void
1013 : 11 : pp_cxx_assignment_operator (cxx_pretty_printer *pp, tree t)
1014 : : {
1015 : 11 : const char *op;
1016 : :
1017 : 11 : switch (TREE_CODE (t))
1018 : : {
1019 : : case NOP_EXPR:
1020 : : op = "=";
1021 : : break;
1022 : :
1023 : 3 : case PLUS_EXPR:
1024 : 3 : op = "+=";
1025 : 3 : break;
1026 : :
1027 : 0 : case MINUS_EXPR:
1028 : 0 : op = "-=";
1029 : 0 : break;
1030 : :
1031 : 0 : case TRUNC_DIV_EXPR:
1032 : 0 : op = "/=";
1033 : 0 : break;
1034 : :
1035 : 1 : case TRUNC_MOD_EXPR:
1036 : 1 : op = "%=";
1037 : 1 : break;
1038 : :
1039 : 0 : default:
1040 : 0 : op = get_tree_code_name (TREE_CODE (t));
1041 : 0 : break;
1042 : : }
1043 : :
1044 : 11 : pp_cxx_ws_string (pp, op);
1045 : 11 : }
1046 : :
1047 : :
1048 : : /* assignment-expression:
1049 : : conditional-expression
1050 : : logical-or-expression assignment-operator assignment-expression
1051 : : throw-expression
1052 : :
1053 : : throw-expression:
1054 : : throw assignment-expression(opt)
1055 : :
1056 : : assignment-operator: one of
1057 : : = *= /= %= += -= >>= <<= &= ^= |= */
1058 : :
1059 : : void
1060 : 14 : cxx_pretty_printer::assignment_expression (tree e)
1061 : : {
1062 : 25 : switch (TREE_CODE (e))
1063 : : {
1064 : 0 : case MODIFY_EXPR:
1065 : 0 : case INIT_EXPR:
1066 : 0 : pp_c_logical_or_expression (this, TREE_OPERAND (e, 0));
1067 : 0 : pp_space (this);
1068 : 0 : pp_equal (this);
1069 : 0 : pp_space (this);
1070 : 0 : assignment_expression (TREE_OPERAND (e, 1));
1071 : 0 : break;
1072 : :
1073 : 0 : case THROW_EXPR:
1074 : 0 : pp_cxx_ws_string (this, "throw");
1075 : 0 : if (TREE_OPERAND (e, 0))
1076 : 0 : assignment_expression (TREE_OPERAND (e, 0));
1077 : : break;
1078 : :
1079 : 11 : case MODOP_EXPR:
1080 : 11 : pp_c_logical_or_expression (this, TREE_OPERAND (e, 0));
1081 : 11 : pp_cxx_assignment_operator (this, TREE_OPERAND (e, 1));
1082 : 11 : assignment_expression (TREE_OPERAND (e, 2));
1083 : 11 : break;
1084 : :
1085 : 14 : default:
1086 : 14 : conditional_expression (e);
1087 : 14 : break;
1088 : : }
1089 : 14 : }
1090 : :
1091 : : void
1092 : 24537 : cxx_pretty_printer::expression (tree t)
1093 : : {
1094 : 24555 : switch (TREE_CODE (t))
1095 : : {
1096 : 1138 : case STRING_CST:
1097 : 1138 : case VOID_CST:
1098 : 1138 : case INTEGER_CST:
1099 : 1138 : case REAL_CST:
1100 : 1138 : case COMPLEX_CST:
1101 : 1138 : constant (t);
1102 : 1138 : break;
1103 : :
1104 : 0 : case USERDEF_LITERAL:
1105 : 0 : pp_cxx_userdef_literal (this, t);
1106 : 0 : break;
1107 : :
1108 : 0 : case RESULT_DECL:
1109 : 0 : pp_cxx_unqualified_id (this, t);
1110 : 0 : break;
1111 : :
1112 : : #if 0
1113 : : case OFFSET_REF:
1114 : : #endif
1115 : 70 : case SCOPE_REF:
1116 : 70 : case PTRMEM_CST:
1117 : 70 : pp_cxx_qualified_id (this, t);
1118 : 70 : break;
1119 : :
1120 : : case OVERLOAD:
1121 : 21 : t = OVL_FIRST (t);
1122 : : /* FALLTHRU */
1123 : 21 : case VAR_DECL:
1124 : 21 : if (DECL_NTTP_OBJECT_P (t))
1125 : : {
1126 : : /* Print the type followed by the CONSTRUCTOR value of the
1127 : : NTTP object. */
1128 : 6 : simple_type_specifier (cv_unqualified (TREE_TYPE (t)));
1129 : 6 : expression (DECL_INITIAL (t));
1130 : 6 : break;
1131 : : }
1132 : : /* FALLTHRU */
1133 : 6758 : case PARM_DECL:
1134 : 6758 : case FIELD_DECL:
1135 : 6758 : case CONST_DECL:
1136 : 6758 : case FUNCTION_DECL:
1137 : 6758 : case BASELINK:
1138 : 6758 : case TEMPLATE_DECL:
1139 : 6758 : case TEMPLATE_TYPE_PARM:
1140 : 6758 : case TEMPLATE_PARM_INDEX:
1141 : 6758 : case TEMPLATE_TEMPLATE_PARM:
1142 : 6758 : case STMT_EXPR:
1143 : 6758 : case REQUIRES_EXPR:
1144 : 6758 : primary_expression (t);
1145 : 6758 : break;
1146 : :
1147 : 2580 : case CALL_EXPR:
1148 : 2580 : case DYNAMIC_CAST_EXPR:
1149 : 2580 : case STATIC_CAST_EXPR:
1150 : 2580 : case REINTERPRET_CAST_EXPR:
1151 : 2580 : case CONST_CAST_EXPR:
1152 : : #if 0
1153 : : case MEMBER_REF:
1154 : : #endif
1155 : 2580 : case EMPTY_CLASS_EXPR:
1156 : 2580 : case TYPEID_EXPR:
1157 : 2580 : case PSEUDO_DTOR_EXPR:
1158 : 2580 : case AGGR_INIT_EXPR:
1159 : 2580 : case ARROW_EXPR:
1160 : 2580 : postfix_expression (t);
1161 : 2580 : break;
1162 : :
1163 : 6 : case NEW_EXPR:
1164 : 6 : case VEC_NEW_EXPR:
1165 : 6 : pp_cxx_new_expression (this, t);
1166 : 6 : break;
1167 : :
1168 : 15 : case DELETE_EXPR:
1169 : 15 : case VEC_DELETE_EXPR:
1170 : 15 : pp_cxx_delete_expression (this, t);
1171 : 15 : break;
1172 : :
1173 : 6 : case SIZEOF_EXPR:
1174 : 6 : case ALIGNOF_EXPR:
1175 : 6 : case NOEXCEPT_EXPR:
1176 : 6 : case UNARY_PLUS_EXPR:
1177 : 6 : unary_expression (t);
1178 : 6 : break;
1179 : :
1180 : 44 : case CAST_EXPR:
1181 : 44 : case IMPLICIT_CONV_EXPR:
1182 : 44 : pp_cxx_cast_expression (this, t);
1183 : 44 : break;
1184 : :
1185 : 9 : case OFFSET_REF:
1186 : 9 : case MEMBER_REF:
1187 : 9 : case DOTSTAR_EXPR:
1188 : 9 : pp_cxx_pm_expression (this, t);
1189 : 9 : break;
1190 : :
1191 : 8 : case MULT_EXPR:
1192 : 8 : case TRUNC_DIV_EXPR:
1193 : 8 : case TRUNC_MOD_EXPR:
1194 : 8 : case EXACT_DIV_EXPR:
1195 : 8 : case RDIV_EXPR:
1196 : 8 : multiplicative_expression (t);
1197 : 8 : break;
1198 : :
1199 : 0 : case COND_EXPR:
1200 : 0 : conditional_expression (t);
1201 : 0 : break;
1202 : :
1203 : 11 : case MODIFY_EXPR:
1204 : 11 : case INIT_EXPR:
1205 : 11 : case THROW_EXPR:
1206 : 11 : case MODOP_EXPR:
1207 : 11 : assignment_expression (t);
1208 : 11 : break;
1209 : :
1210 : 0 : case MUST_NOT_THROW_EXPR:
1211 : 0 : expression (TREE_OPERAND (t, 0));
1212 : 0 : break;
1213 : :
1214 : 634 : case EXPR_PACK_EXPANSION:
1215 : 634 : expression (PACK_EXPANSION_PATTERN (t));
1216 : 634 : pp_cxx_ws_string (this, "...");
1217 : 634 : break;
1218 : :
1219 : 260 : case UNARY_LEFT_FOLD_EXPR:
1220 : 260 : pp_cxx_unary_left_fold_expression (this, t);
1221 : 260 : break;
1222 : :
1223 : 1233 : case UNARY_RIGHT_FOLD_EXPR:
1224 : 1233 : pp_cxx_unary_right_fold_expression (this, t);
1225 : 1233 : break;
1226 : :
1227 : 0 : case BINARY_LEFT_FOLD_EXPR:
1228 : 0 : case BINARY_RIGHT_FOLD_EXPR:
1229 : 0 : pp_cxx_binary_fold_expression (this, t);
1230 : 0 : break;
1231 : :
1232 : 9594 : case TEMPLATE_ID_EXPR:
1233 : 9594 : pp_cxx_template_id (this, t);
1234 : 9594 : break;
1235 : :
1236 : 1 : case NONTYPE_ARGUMENT_PACK:
1237 : 1 : {
1238 : 1 : tree args = ARGUMENT_PACK_ARGS (t);
1239 : 1 : int i, len = TREE_VEC_LENGTH (args);
1240 : 1 : pp_cxx_left_brace (this);
1241 : 5 : for (i = 0; i < len; ++i)
1242 : : {
1243 : 3 : if (i > 0)
1244 : 2 : pp_cxx_separate_with (this, ',');
1245 : 3 : expression (TREE_VEC_ELT (args, i));
1246 : : }
1247 : 1 : pp_cxx_right_brace (this);
1248 : : }
1249 : 1 : break;
1250 : :
1251 : 7 : case LAMBDA_EXPR:
1252 : 7 : pp_cxx_ws_string (this, "<lambda>");
1253 : 7 : break;
1254 : :
1255 : 90 : case TRAIT_EXPR:
1256 : 90 : pp_cxx_trait (this, t);
1257 : 90 : break;
1258 : :
1259 : 0 : case ATOMIC_CONSTR:
1260 : 0 : case CONJ_CONSTR:
1261 : 0 : case DISJ_CONSTR:
1262 : 0 : pp_cxx_constraint (this, t);
1263 : 0 : break;
1264 : :
1265 : 0 : case PAREN_EXPR:
1266 : 0 : pp_cxx_left_paren (this);
1267 : 0 : expression (TREE_OPERAND (t, 0));
1268 : 0 : pp_cxx_right_paren (this);
1269 : 0 : break;
1270 : :
1271 : 130 : case VIEW_CONVERT_EXPR:
1272 : 130 : if (TREE_CODE (TREE_OPERAND (t, 0)) == TEMPLATE_PARM_INDEX)
1273 : : {
1274 : : /* Strip const VIEW_CONVERT_EXPR wrappers for class NTTPs. */
1275 : 12 : expression (TREE_OPERAND (t, 0));
1276 : 12 : break;
1277 : : }
1278 : : /* FALLTHRU */
1279 : 2073 : default:
1280 : 2073 : c_pretty_printer::expression (t);
1281 : 2073 : break;
1282 : : }
1283 : 24537 : }
1284 : :
1285 : :
1286 : : /* Declarations. */
1287 : :
1288 : : /* function-specifier:
1289 : : inline
1290 : : virtual
1291 : : explicit */
1292 : :
1293 : : void
1294 : 160 : cxx_pretty_printer::function_specifier (tree t)
1295 : : {
1296 : 160 : switch (TREE_CODE (t))
1297 : : {
1298 : 0 : case FUNCTION_DECL:
1299 : 0 : if (DECL_VIRTUAL_P (t))
1300 : 0 : pp_cxx_ws_string (this, "virtual");
1301 : 0 : else if (DECL_CONSTRUCTOR_P (t) && DECL_NONCONVERTING_P (t))
1302 : 0 : pp_cxx_ws_string (this, "explicit");
1303 : : else
1304 : 0 : c_pretty_printer::function_specifier (t);
1305 : :
1306 : 160 : default:
1307 : 160 : break;
1308 : : }
1309 : 160 : }
1310 : :
1311 : : /* decl-specifier-seq:
1312 : : decl-specifier-seq(opt) decl-specifier
1313 : :
1314 : : decl-specifier:
1315 : : storage-class-specifier
1316 : : type-specifier
1317 : : function-specifier
1318 : : friend
1319 : : typedef */
1320 : :
1321 : : void
1322 : 160 : cxx_pretty_printer::declaration_specifiers (tree t)
1323 : : {
1324 : 287 : switch (TREE_CODE (t))
1325 : : {
1326 : 127 : case VAR_DECL:
1327 : 127 : case PARM_DECL:
1328 : 127 : case CONST_DECL:
1329 : 127 : case FIELD_DECL:
1330 : 127 : storage_class_specifier (t);
1331 : 127 : declaration_specifiers (TREE_TYPE (t));
1332 : 127 : break;
1333 : :
1334 : 0 : case TYPE_DECL:
1335 : 0 : pp_cxx_ws_string (this, "typedef");
1336 : 0 : declaration_specifiers (TREE_TYPE (t));
1337 : 0 : break;
1338 : :
1339 : 0 : case FUNCTION_DECL:
1340 : : /* Constructors don't have return types. And conversion functions
1341 : : do not have a type-specifier in their return types. */
1342 : 0 : if (DECL_CONSTRUCTOR_P (t) || DECL_CONV_FN_P (t))
1343 : 0 : function_specifier (t);
1344 : 0 : else if (DECL_IOBJ_MEMBER_FUNCTION_P (t))
1345 : 0 : declaration_specifiers (TREE_TYPE (TREE_TYPE (t)));
1346 : : else
1347 : 0 : c_pretty_printer::declaration_specifiers (t);
1348 : : break;
1349 : 160 : default:
1350 : 160 : c_pretty_printer::declaration_specifiers (t);
1351 : 160 : break;
1352 : : }
1353 : 160 : }
1354 : :
1355 : : /* simple-type-specifier:
1356 : : ::(opt) nested-name-specifier(opt) type-name
1357 : : ::(opt) nested-name-specifier(opt) template(opt) template-id
1358 : : decltype-specifier
1359 : : char
1360 : : wchar_t
1361 : : bool
1362 : : short
1363 : : int
1364 : : long
1365 : : signed
1366 : : unsigned
1367 : : float
1368 : : double
1369 : : void */
1370 : :
1371 : : void
1372 : 89635742 : cxx_pretty_printer::simple_type_specifier (tree t)
1373 : : {
1374 : 89635742 : switch (TREE_CODE (t))
1375 : : {
1376 : 611826 : case RECORD_TYPE:
1377 : 611826 : case UNION_TYPE:
1378 : 611826 : case ENUMERAL_TYPE:
1379 : 611826 : pp_cxx_qualified_id (this, t);
1380 : 611826 : break;
1381 : :
1382 : 13518 : case TEMPLATE_TYPE_PARM:
1383 : 13518 : case TEMPLATE_TEMPLATE_PARM:
1384 : 13518 : case TEMPLATE_PARM_INDEX:
1385 : 13518 : case BOUND_TEMPLATE_TEMPLATE_PARM:
1386 : 13518 : pp_cxx_unqualified_id (this, t);
1387 : 13518 : if (TREE_CODE (t) == TEMPLATE_TYPE_PARM)
1388 : 13512 : if (tree c = PLACEHOLDER_TYPE_CONSTRAINTS (t))
1389 : 152 : pp_cxx_constrained_type_spec (this, c);
1390 : : break;
1391 : :
1392 : 1820 : case TYPENAME_TYPE:
1393 : 1820 : pp_cxx_ws_string (this, "typename");
1394 : 1820 : pp_cxx_nested_name_specifier (this, TYPE_CONTEXT (t));
1395 : 1820 : pp_cxx_unqualified_id (this, TYPENAME_TYPE_FULLNAME (t));
1396 : 1820 : break;
1397 : :
1398 : 1554 : case DECLTYPE_TYPE:
1399 : 1554 : pp_cxx_ws_string (this, "decltype");
1400 : 1554 : pp_cxx_left_paren (this);
1401 : 1554 : this->expression (DECLTYPE_TYPE_EXPR (t));
1402 : 1554 : pp_cxx_right_paren (this);
1403 : 1554 : break;
1404 : :
1405 : 24 : case NULLPTR_TYPE:
1406 : 24 : pp_cxx_ws_string (this, "std::nullptr_t");
1407 : 24 : break;
1408 : :
1409 : 6 : case TRAIT_TYPE:
1410 : 6 : pp_cxx_trait (this, t);
1411 : 6 : break;
1412 : :
1413 : 89006994 : default:
1414 : 89006994 : c_pretty_printer::simple_type_specifier (t);
1415 : 89006994 : break;
1416 : : }
1417 : 89635742 : }
1418 : :
1419 : : /* type-specifier-seq:
1420 : : type-specifier type-specifier-seq(opt)
1421 : :
1422 : : type-specifier:
1423 : : simple-type-specifier
1424 : : class-specifier
1425 : : enum-specifier
1426 : : elaborated-type-specifier
1427 : : cv-qualifier */
1428 : :
1429 : : static void
1430 : 45127900 : pp_cxx_type_specifier_seq (cxx_pretty_printer *pp, tree t)
1431 : : {
1432 : 45127900 : switch (TREE_CODE (t))
1433 : : {
1434 : 14651 : case TEMPLATE_DECL:
1435 : 14651 : case TEMPLATE_TYPE_PARM:
1436 : 14651 : case TEMPLATE_TEMPLATE_PARM:
1437 : 14651 : case TYPE_DECL:
1438 : 14651 : case BOUND_TEMPLATE_TEMPLATE_PARM:
1439 : 14651 : case DECLTYPE_TYPE:
1440 : 14651 : case NULLPTR_TYPE:
1441 : 14651 : pp_cxx_cv_qualifier_seq (pp, t);
1442 : 14651 : pp->simple_type_specifier (t);
1443 : 14651 : break;
1444 : :
1445 : 0 : case METHOD_TYPE:
1446 : 0 : pp_cxx_type_specifier_seq (pp, TREE_TYPE (t));
1447 : 0 : pp_cxx_space_for_pointer_operator (pp, TREE_TYPE (t));
1448 : 0 : pp_cxx_nested_name_specifier (pp, TYPE_METHOD_BASETYPE (t));
1449 : 0 : break;
1450 : :
1451 : 1223 : case RECORD_TYPE:
1452 : 1223 : if (TYPE_PTRMEMFUNC_P (t))
1453 : : {
1454 : 3 : tree pfm = TYPE_PTRMEMFUNC_FN_TYPE (t);
1455 : 3 : pp->declaration_specifiers (TREE_TYPE (TREE_TYPE (pfm)));
1456 : 3 : pp_cxx_whitespace (pp);
1457 : 3 : pp_cxx_ptr_operator (pp, t);
1458 : 3 : break;
1459 : : }
1460 : : /* fall through */
1461 : :
1462 : 1232 : case OFFSET_TYPE:
1463 : 1232 : if (TYPE_PTRDATAMEM_P (t))
1464 : : {
1465 : 12 : pp_cxx_type_specifier_seq (pp, TREE_TYPE (t));
1466 : 12 : pp_cxx_whitespace (pp);
1467 : 12 : pp_cxx_ptr_operator (pp, t);
1468 : 12 : break;
1469 : : }
1470 : : /* fall through */
1471 : :
1472 : 45113234 : default:
1473 : 45113234 : if (!(TREE_CODE (t) == FUNCTION_DECL && DECL_CONSTRUCTOR_P (t)))
1474 : 45113234 : pp_c_specifier_qualifier_list (pp, t);
1475 : : }
1476 : 45127900 : }
1477 : :
1478 : : /* ptr-operator:
1479 : : * cv-qualifier-seq(opt)
1480 : : &
1481 : : ::(opt) nested-name-specifier * cv-qualifier-seq(opt) */
1482 : :
1483 : : static void
1484 : 15 : pp_cxx_ptr_operator (cxx_pretty_printer *pp, tree t)
1485 : : {
1486 : 15 : if (!TYPE_P (t) && TREE_CODE (t) != TYPE_DECL)
1487 : 0 : t = TREE_TYPE (t);
1488 : 15 : switch (TREE_CODE (t))
1489 : : {
1490 : 0 : case REFERENCE_TYPE:
1491 : 0 : case POINTER_TYPE:
1492 : 0 : if (TYPE_PTR_OR_PTRMEM_P (TREE_TYPE (t)))
1493 : 0 : pp_cxx_ptr_operator (pp, TREE_TYPE (t));
1494 : 0 : pp_c_attributes_display (pp, TYPE_ATTRIBUTES (TREE_TYPE (t)));
1495 : 0 : if (TYPE_PTR_P (t))
1496 : : {
1497 : 0 : pp_star (pp);
1498 : 0 : pp_cxx_cv_qualifier_seq (pp, t);
1499 : : }
1500 : : else
1501 : 0 : pp_ampersand (pp);
1502 : : break;
1503 : :
1504 : 3 : case RECORD_TYPE:
1505 : 3 : if (TYPE_PTRMEMFUNC_P (t))
1506 : : {
1507 : 3 : pp_cxx_left_paren (pp);
1508 : 3 : pp_cxx_nested_name_specifier (pp, TYPE_PTRMEMFUNC_OBJECT_TYPE (t));
1509 : 3 : pp_star (pp);
1510 : 3 : break;
1511 : : }
1512 : : /* FALLTHRU */
1513 : 12 : case OFFSET_TYPE:
1514 : 12 : if (TYPE_PTRMEM_P (t))
1515 : : {
1516 : 12 : if (TREE_CODE (TREE_TYPE (t)) == ARRAY_TYPE)
1517 : 3 : pp_cxx_left_paren (pp);
1518 : 12 : pp_cxx_nested_name_specifier (pp, TYPE_PTRMEM_CLASS_TYPE (t));
1519 : 12 : pp_star (pp);
1520 : 12 : pp_cxx_cv_qualifier_seq (pp, t);
1521 : 12 : break;
1522 : : }
1523 : : /* fall through. */
1524 : :
1525 : 0 : default:
1526 : 0 : pp_unsupported_tree (pp, t);
1527 : 0 : break;
1528 : : }
1529 : 15 : }
1530 : :
1531 : : static inline tree
1532 : 0 : pp_cxx_implicit_parameter_type (tree mf)
1533 : : {
1534 : 0 : return class_of_this_parm (TREE_TYPE (mf));
1535 : : }
1536 : :
1537 : : /*
1538 : : parameter-declaration:
1539 : : decl-specifier-seq declarator
1540 : : decl-specifier-seq declarator = assignment-expression
1541 : : decl-specifier-seq abstract-declarator(opt)
1542 : : decl-specifier-seq abstract-declarator(opt) assignment-expression */
1543 : :
1544 : : static inline void
1545 : 157 : pp_cxx_parameter_declaration (cxx_pretty_printer *pp, tree t)
1546 : : {
1547 : 157 : pp->declaration_specifiers (t);
1548 : 157 : if (TYPE_P (t))
1549 : 30 : pp->abstract_declarator (t);
1550 : : else
1551 : 127 : pp->declarator (t);
1552 : 157 : }
1553 : :
1554 : : /* parameter-declaration-clause:
1555 : : parameter-declaration-list(opt) ...(opt)
1556 : : parameter-declaration-list , ...
1557 : :
1558 : : parameter-declaration-list:
1559 : : parameter-declaration
1560 : : parameter-declaration-list , parameter-declaration */
1561 : :
1562 : : static void
1563 : 69 : pp_cxx_parameter_declaration_clause (cxx_pretty_printer *pp, tree t)
1564 : : {
1565 : 69 : gcc_assert (FUNC_OR_METHOD_TYPE_P (t) || TREE_CODE (t) == FUNCTION_DECL);
1566 : 69 : tree types, args;
1567 : 69 : if (TYPE_P (t))
1568 : : {
1569 : 69 : types = TYPE_ARG_TYPES (t);
1570 : 69 : args = NULL_TREE;
1571 : : }
1572 : : else
1573 : : {
1574 : 0 : types = FUNCTION_FIRST_USER_PARMTYPE (t);
1575 : 0 : args = FUNCTION_FIRST_USER_PARM (t);
1576 : : }
1577 : 69 : bool abstract = !args || (pp->flags & pp_c_flag_abstract);
1578 : :
1579 : : /* Skip artificial parameter for non-static member functions. */
1580 : 69 : if (TREE_CODE (t) == METHOD_TYPE)
1581 : 5 : types = TREE_CHAIN (types);
1582 : :
1583 : 69 : bool first = true;
1584 : 69 : pp_cxx_left_paren (pp);
1585 : 168 : for (; types != void_list_node; types = TREE_CHAIN (types))
1586 : : {
1587 : 63 : if (!first)
1588 : 12 : pp_cxx_separate_with (pp, ',');
1589 : 63 : first = false;
1590 : 63 : if (!types)
1591 : : {
1592 : 33 : pp_cxx_ws_string (pp, "...");
1593 : 33 : break;
1594 : : }
1595 : 60 : pp_cxx_parameter_declaration (pp, abstract ? TREE_VALUE (types) : args);
1596 : 30 : if (!abstract && pp->flags & pp_cxx_flag_default_argument)
1597 : : {
1598 : 0 : pp_cxx_whitespace (pp);
1599 : 0 : pp_equal (pp);
1600 : 0 : pp_cxx_whitespace (pp);
1601 : 0 : pp->assignment_expression (TREE_PURPOSE (types));
1602 : : }
1603 : 0 : if (!abstract)
1604 : 0 : args = TREE_CHAIN (args);
1605 : : }
1606 : 69 : pp_cxx_right_paren (pp);
1607 : 69 : }
1608 : :
1609 : : /* exception-specification:
1610 : : throw ( type-id-list(opt) )
1611 : :
1612 : : type-id-list
1613 : : type-id
1614 : : type-id-list , type-id */
1615 : :
1616 : : static void
1617 : 25 : pp_cxx_exception_specification (cxx_pretty_printer *pp, tree t)
1618 : : {
1619 : 25 : tree ex_spec = TYPE_RAISES_EXCEPTIONS (t);
1620 : 25 : bool need_comma = false;
1621 : :
1622 : 25 : if (ex_spec == NULL)
1623 : : return;
1624 : 0 : if (TREE_PURPOSE (ex_spec))
1625 : : {
1626 : 0 : pp_cxx_ws_string (pp, "noexcept");
1627 : 0 : pp_cxx_whitespace (pp);
1628 : 0 : pp_cxx_left_paren (pp);
1629 : 0 : if (DEFERRED_NOEXCEPT_SPEC_P (ex_spec))
1630 : 0 : pp_cxx_ws_string (pp, "<uninstantiated>");
1631 : : else
1632 : 0 : pp->expression (TREE_PURPOSE (ex_spec));
1633 : 0 : pp_cxx_right_paren (pp);
1634 : 0 : return;
1635 : : }
1636 : 0 : pp_cxx_ws_string (pp, "throw");
1637 : 0 : pp_cxx_left_paren (pp);
1638 : 0 : for (; ex_spec && TREE_VALUE (ex_spec); ex_spec = TREE_CHAIN (ex_spec))
1639 : : {
1640 : 0 : tree type = TREE_VALUE (ex_spec);
1641 : 0 : tree argpack = NULL_TREE;
1642 : 0 : int i, len = 1;
1643 : :
1644 : 0 : if (ARGUMENT_PACK_P (type))
1645 : : {
1646 : 0 : argpack = ARGUMENT_PACK_ARGS (type);
1647 : 0 : len = TREE_VEC_LENGTH (argpack);
1648 : : }
1649 : :
1650 : 0 : for (i = 0; i < len; ++i)
1651 : : {
1652 : 0 : if (argpack)
1653 : 0 : type = TREE_VEC_ELT (argpack, i);
1654 : :
1655 : 0 : if (need_comma)
1656 : 0 : pp_cxx_separate_with (pp, ',');
1657 : : else
1658 : : need_comma = true;
1659 : :
1660 : 0 : pp->type_id (type);
1661 : : }
1662 : : }
1663 : 0 : pp_cxx_right_paren (pp);
1664 : : }
1665 : :
1666 : : /* direct-declarator:
1667 : : declarator-id
1668 : : direct-declarator ( parameter-declaration-clause ) cv-qualifier-seq(opt)
1669 : : exception-specification(opt)
1670 : : direct-declaration [ constant-expression(opt) ]
1671 : : ( declarator ) */
1672 : :
1673 : : void
1674 : 127 : cxx_pretty_printer::direct_declarator (tree t)
1675 : : {
1676 : 127 : switch (TREE_CODE (t))
1677 : : {
1678 : 127 : case VAR_DECL:
1679 : 127 : case PARM_DECL:
1680 : 127 : case CONST_DECL:
1681 : 127 : case FIELD_DECL:
1682 : 127 : if (DECL_NAME (t))
1683 : : {
1684 : 127 : pp_cxx_space_for_pointer_operator (this, TREE_TYPE (t));
1685 : :
1686 : 127 : if ((TREE_CODE (t) == PARM_DECL && DECL_PACK_P (t))
1687 : 254 : || template_parameter_pack_p (t))
1688 : : /* A function parameter pack or non-type template
1689 : : parameter pack. */
1690 : 0 : pp_cxx_ws_string (this, "...");
1691 : :
1692 : 127 : id_expression (DECL_NAME (t));
1693 : : }
1694 : 127 : abstract_declarator (TREE_TYPE (t));
1695 : 127 : break;
1696 : :
1697 : 0 : case FUNCTION_DECL:
1698 : 0 : pp_cxx_space_for_pointer_operator (this, TREE_TYPE (TREE_TYPE (t)));
1699 : 0 : expression (t);
1700 : 0 : pp_cxx_parameter_declaration_clause (this, t);
1701 : :
1702 : 0 : if (DECL_IOBJ_MEMBER_FUNCTION_P (t))
1703 : : {
1704 : 0 : set_padding (pp_before);
1705 : 0 : pp_cxx_cv_qualifier_seq (this, pp_cxx_implicit_parameter_type (t));
1706 : : }
1707 : :
1708 : 0 : pp_cxx_exception_specification (this, TREE_TYPE (t));
1709 : 0 : break;
1710 : :
1711 : : case TYPENAME_TYPE:
1712 : : case TEMPLATE_DECL:
1713 : : case TEMPLATE_TYPE_PARM:
1714 : : case TEMPLATE_PARM_INDEX:
1715 : : case TEMPLATE_TEMPLATE_PARM:
1716 : : break;
1717 : :
1718 : 0 : default:
1719 : 0 : c_pretty_printer::direct_declarator (t);
1720 : 0 : break;
1721 : : }
1722 : 127 : }
1723 : :
1724 : : /* declarator:
1725 : : direct-declarator
1726 : : ptr-operator declarator */
1727 : :
1728 : : void
1729 : 127 : cxx_pretty_printer::declarator (tree t)
1730 : : {
1731 : 127 : direct_declarator (t);
1732 : :
1733 : : // Print a requires clause.
1734 : 127 : if (flag_concepts)
1735 : 127 : if (tree ci = get_constraints (t))
1736 : 0 : if (tree reqs = CI_DECLARATOR_REQS (ci))
1737 : 0 : pp_cxx_requires_clause (this, reqs);
1738 : 127 : }
1739 : :
1740 : : /* ctor-initializer:
1741 : : : mem-initializer-list
1742 : :
1743 : : mem-initializer-list:
1744 : : mem-initializer
1745 : : mem-initializer , mem-initializer-list
1746 : :
1747 : : mem-initializer:
1748 : : mem-initializer-id ( expression-list(opt) )
1749 : :
1750 : : mem-initializer-id:
1751 : : ::(opt) nested-name-specifier(opt) class-name
1752 : : identifier */
1753 : :
1754 : : static void
1755 : 0 : pp_cxx_ctor_initializer (cxx_pretty_printer *pp, tree t)
1756 : : {
1757 : 0 : t = TREE_OPERAND (t, 0);
1758 : 0 : pp_cxx_whitespace (pp);
1759 : 0 : pp_colon (pp);
1760 : 0 : pp_cxx_whitespace (pp);
1761 : 0 : for (; t; t = TREE_CHAIN (t))
1762 : : {
1763 : 0 : tree purpose = TREE_PURPOSE (t);
1764 : 0 : bool is_pack = PACK_EXPANSION_P (purpose);
1765 : :
1766 : 0 : if (is_pack)
1767 : 0 : pp->primary_expression (PACK_EXPANSION_PATTERN (purpose));
1768 : : else
1769 : 0 : pp->primary_expression (purpose);
1770 : 0 : pp_cxx_call_argument_list (pp, TREE_VALUE (t));
1771 : 0 : if (is_pack)
1772 : 0 : pp_cxx_ws_string (pp, "...");
1773 : 0 : if (TREE_CHAIN (t))
1774 : 0 : pp_cxx_separate_with (pp, ',');
1775 : : }
1776 : 0 : }
1777 : :
1778 : : /* function-definition:
1779 : : decl-specifier-seq(opt) declarator ctor-initializer(opt) function-body
1780 : : decl-specifier-seq(opt) declarator function-try-block */
1781 : :
1782 : : static void
1783 : 0 : pp_cxx_function_definition (cxx_pretty_printer *pp, tree t)
1784 : : {
1785 : 0 : tree saved_scope = pp->enclosing_scope;
1786 : 0 : pp->declaration_specifiers (t);
1787 : 0 : pp->declarator (t);
1788 : 0 : pp_needs_newline (pp) = true;
1789 : 0 : pp->enclosing_scope = DECL_CONTEXT (t);
1790 : 0 : if (DECL_SAVED_TREE (t))
1791 : 0 : pp->statement (DECL_SAVED_TREE (t));
1792 : : else
1793 : 0 : pp_cxx_semicolon (pp);
1794 : 0 : pp_newline_and_flush (pp);
1795 : 0 : pp->enclosing_scope = saved_scope;
1796 : 0 : }
1797 : :
1798 : : /* abstract-declarator:
1799 : : ptr-operator abstract-declarator(opt)
1800 : : direct-abstract-declarator */
1801 : :
1802 : : void
1803 : 4282 : cxx_pretty_printer::abstract_declarator (tree t)
1804 : : {
1805 : : /* pp_cxx_ptr_operator prints '(' for a pointer-to-member function,
1806 : : or a pointer-to-data-member of array type:
1807 : :
1808 : : void (X::*)()
1809 : : int (X::*)[5]
1810 : :
1811 : : but not for a pointer-to-data-member of non-array type:
1812 : :
1813 : : int X::*
1814 : :
1815 : : so be mindful of that. */
1816 : 18 : if (TYPE_PTRMEMFUNC_P (t)
1817 : 4297 : || (TYPE_PTRDATAMEM_P (t)
1818 : 12 : && TREE_CODE (TREE_TYPE (t)) == ARRAY_TYPE))
1819 : 6 : pp_cxx_right_paren (this);
1820 : 4276 : else if (INDIRECT_TYPE_P (t))
1821 : : {
1822 : 2293 : if (TREE_CODE (TREE_TYPE (t)) == ARRAY_TYPE
1823 : 2293 : || TREE_CODE (TREE_TYPE (t)) == FUNCTION_TYPE)
1824 : 115 : pp_cxx_right_paren (this);
1825 : 2293 : t = TREE_TYPE (t);
1826 : : }
1827 : 4282 : direct_abstract_declarator (t);
1828 : 4282 : }
1829 : :
1830 : : /* direct-abstract-declarator:
1831 : : direct-abstract-declarator(opt) ( parameter-declaration-clause )
1832 : : cv-qualifier-seq(opt) exception-specification(opt)
1833 : : direct-abstract-declarator(opt) [ constant-expression(opt) ]
1834 : : ( abstract-declarator ) */
1835 : :
1836 : : void
1837 : 4482 : cxx_pretty_printer::direct_abstract_declarator (tree t)
1838 : : {
1839 : 4497 : switch (TREE_CODE (t))
1840 : : {
1841 : 0 : case REFERENCE_TYPE:
1842 : 0 : abstract_declarator (t);
1843 : 0 : break;
1844 : :
1845 : 420 : case RECORD_TYPE:
1846 : 420 : if (TYPE_PTRMEMFUNC_P (t))
1847 : 3 : direct_abstract_declarator (TYPE_PTRMEMFUNC_FN_TYPE (t));
1848 : : break;
1849 : :
1850 : 12 : case OFFSET_TYPE:
1851 : 12 : if (TYPE_PTRDATAMEM_P (t))
1852 : 12 : direct_abstract_declarator (TREE_TYPE (t));
1853 : : break;
1854 : :
1855 : 25 : case METHOD_TYPE:
1856 : 25 : case FUNCTION_TYPE:
1857 : 25 : pp_cxx_parameter_declaration_clause (this, t);
1858 : 25 : direct_abstract_declarator (TREE_TYPE (t));
1859 : 25 : if (TREE_CODE (t) == METHOD_TYPE)
1860 : : {
1861 : 3 : set_padding (pp_before);
1862 : 3 : pp_cxx_cv_qualifier_seq (this, class_of_this_parm (t));
1863 : : }
1864 : 25 : pp_cxx_exception_specification (this, t);
1865 : 25 : break;
1866 : :
1867 : : case TYPENAME_TYPE:
1868 : : case TEMPLATE_TYPE_PARM:
1869 : : case TEMPLATE_TEMPLATE_PARM:
1870 : : case BOUND_TEMPLATE_TEMPLATE_PARM:
1871 : : case UNBOUND_CLASS_TEMPLATE:
1872 : : case DECLTYPE_TYPE:
1873 : : break;
1874 : :
1875 : 2415 : default:
1876 : 2415 : c_pretty_printer::direct_abstract_declarator (t);
1877 : 2415 : break;
1878 : : }
1879 : 4482 : }
1880 : :
1881 : : /* type-id:
1882 : : type-specifier-seq abstract-declarator(opt) */
1883 : :
1884 : : void
1885 : 634948 : cxx_pretty_printer::type_id (tree t)
1886 : : {
1887 : 634948 : pp_flags saved_flags = flags;
1888 : 634948 : flags |= pp_c_flag_abstract;
1889 : :
1890 : 634948 : switch (TREE_CODE (t))
1891 : : {
1892 : 626674 : case TYPE_DECL:
1893 : 626674 : case UNION_TYPE:
1894 : 626674 : case RECORD_TYPE:
1895 : 626674 : case ENUMERAL_TYPE:
1896 : 626674 : case TYPENAME_TYPE:
1897 : 626674 : case BOUND_TEMPLATE_TEMPLATE_PARM:
1898 : 626674 : case UNBOUND_CLASS_TEMPLATE:
1899 : 626674 : case TEMPLATE_TEMPLATE_PARM:
1900 : 626674 : case TEMPLATE_TYPE_PARM:
1901 : 626674 : case TEMPLATE_PARM_INDEX:
1902 : 626674 : case TEMPLATE_DECL:
1903 : 626674 : case TYPEOF_TYPE:
1904 : 626674 : case TRAIT_TYPE:
1905 : 626674 : case DECLTYPE_TYPE:
1906 : 626674 : case NULLPTR_TYPE:
1907 : 626674 : case TEMPLATE_ID_EXPR:
1908 : 626674 : case OFFSET_TYPE:
1909 : 626674 : pp_cxx_type_specifier_seq (this, t);
1910 : 626674 : if (TYPE_PTRMEM_P (t))
1911 : 15 : abstract_declarator (t);
1912 : : break;
1913 : :
1914 : 4035 : case TYPE_PACK_EXPANSION:
1915 : 4035 : type_id (PACK_EXPANSION_PATTERN (t));
1916 : 4035 : pp_cxx_ws_string (this, "...");
1917 : 4035 : break;
1918 : :
1919 : 140 : case TYPE_ARGUMENT_PACK:
1920 : 140 : {
1921 : 140 : tree args = ARGUMENT_PACK_ARGS (t);
1922 : 140 : int len = TREE_VEC_LENGTH (args);
1923 : 140 : pp_cxx_left_brace (this);
1924 : 384 : for (int i = 0; i < len; ++i)
1925 : : {
1926 : 244 : if (i > 0)
1927 : 116 : pp_cxx_separate_with (this, ',');
1928 : 244 : type_id (TREE_VEC_ELT (args, i));
1929 : : }
1930 : 140 : pp_cxx_right_brace (this);
1931 : : }
1932 : 140 : break;
1933 : :
1934 : 4099 : default:
1935 : 4099 : c_pretty_printer::type_id (t);
1936 : 4099 : break;
1937 : : }
1938 : :
1939 : 634948 : flags = saved_flags;
1940 : 634948 : }
1941 : :
1942 : : /* template-argument-list:
1943 : : template-argument ...(opt)
1944 : : template-argument-list, template-argument ...(opt)
1945 : :
1946 : : template-argument:
1947 : : assignment-expression
1948 : : type-id
1949 : : template-name */
1950 : :
1951 : : static void
1952 : 14784 : pp_cxx_template_argument_list (cxx_pretty_printer *pp, tree t)
1953 : : {
1954 : 14784 : int i;
1955 : 14784 : bool need_comma = false;
1956 : :
1957 : 14784 : if (t == NULL)
1958 : : return;
1959 : 36612 : for (i = 0; i < TREE_VEC_LENGTH (t); ++i)
1960 : : {
1961 : 21828 : tree arg = TREE_VEC_ELT (t, i);
1962 : 21828 : tree argpack = NULL_TREE;
1963 : 21828 : int idx, len = 1;
1964 : :
1965 : 21828 : if (ARGUMENT_PACK_P (arg))
1966 : : {
1967 : 4222 : argpack = ARGUMENT_PACK_ARGS (arg);
1968 : 4222 : len = TREE_VEC_LENGTH (argpack);
1969 : : }
1970 : :
1971 : 43696 : for (idx = 0; idx < len; idx++)
1972 : : {
1973 : 21868 : if (argpack)
1974 : 4262 : arg = TREE_VEC_ELT (argpack, idx);
1975 : :
1976 : 21868 : if (need_comma)
1977 : 7258 : pp_cxx_separate_with (pp, ',');
1978 : : else
1979 : : need_comma = true;
1980 : :
1981 : 21868 : if (TYPE_P (arg) || (TREE_CODE (arg) == TEMPLATE_DECL
1982 : 6 : && TYPE_P (DECL_TEMPLATE_RESULT (arg))))
1983 : 16083 : pp->type_id (arg);
1984 : : else
1985 : 5785 : pp->expression (arg);
1986 : : }
1987 : : }
1988 : : }
1989 : :
1990 : :
1991 : : static void
1992 : 0 : pp_cxx_exception_declaration (cxx_pretty_printer *pp, tree t)
1993 : : {
1994 : 0 : t = DECL_EXPR_DECL (t);
1995 : 0 : pp_cxx_type_specifier_seq (pp, t);
1996 : 0 : if (TYPE_P (t))
1997 : 0 : pp->abstract_declarator (t);
1998 : : else
1999 : 0 : pp->declarator (t);
2000 : 0 : }
2001 : :
2002 : : /* Statements. */
2003 : :
2004 : : void
2005 : 0 : cxx_pretty_printer::statement (tree t)
2006 : : {
2007 : 0 : switch (TREE_CODE (t))
2008 : : {
2009 : 0 : case CTOR_INITIALIZER:
2010 : 0 : pp_cxx_ctor_initializer (this, t);
2011 : 0 : break;
2012 : :
2013 : 0 : case USING_STMT:
2014 : 0 : pp_cxx_ws_string (this, "using");
2015 : 0 : pp_cxx_ws_string (this, "namespace");
2016 : 0 : if (DECL_CONTEXT (t))
2017 : 0 : pp_cxx_nested_name_specifier (this, DECL_CONTEXT (t));
2018 : 0 : pp_cxx_qualified_id (this, USING_STMT_NAMESPACE (t));
2019 : 0 : break;
2020 : :
2021 : 0 : case USING_DECL:
2022 : 0 : pp_cxx_ws_string (this, "using");
2023 : 0 : pp_cxx_nested_name_specifier (this, USING_DECL_SCOPE (t));
2024 : 0 : pp_cxx_unqualified_id (this, DECL_NAME (t));
2025 : 0 : break;
2026 : :
2027 : : case EH_SPEC_BLOCK:
2028 : : break;
2029 : :
2030 : : /* try-block:
2031 : : try compound-statement handler-seq */
2032 : 0 : case TRY_BLOCK:
2033 : 0 : pp_maybe_newline_and_indent (this, 0);
2034 : 0 : pp_cxx_ws_string (this, "try");
2035 : 0 : pp_newline_and_indent (this, 3);
2036 : 0 : statement (TRY_STMTS (t));
2037 : 0 : pp_newline_and_indent (this, -3);
2038 : 0 : if (CLEANUP_P (t))
2039 : : ;
2040 : : else
2041 : 0 : statement (TRY_HANDLERS (t));
2042 : : break;
2043 : :
2044 : : /*
2045 : : handler-seq:
2046 : : handler handler-seq(opt)
2047 : :
2048 : : handler:
2049 : : catch ( exception-declaration ) compound-statement
2050 : :
2051 : : exception-declaration:
2052 : : type-specifier-seq declarator
2053 : : type-specifier-seq abstract-declarator
2054 : : ... */
2055 : 0 : case HANDLER:
2056 : 0 : pp_cxx_ws_string (this, "catch");
2057 : 0 : pp_cxx_left_paren (this);
2058 : 0 : pp_cxx_exception_declaration (this, HANDLER_PARMS (t));
2059 : 0 : pp_cxx_right_paren (this);
2060 : 0 : pp_indentation (this) += 3;
2061 : 0 : pp_needs_newline (this) = true;
2062 : 0 : statement (HANDLER_BODY (t));
2063 : 0 : pp_indentation (this) -= 3;
2064 : 0 : pp_needs_newline (this) = true;
2065 : 0 : break;
2066 : :
2067 : : /* selection-statement:
2068 : : if ( expression ) statement
2069 : : if ( expression ) statement else statement */
2070 : 0 : case IF_STMT:
2071 : 0 : pp_cxx_ws_string (this, "if");
2072 : 0 : pp_cxx_whitespace (this);
2073 : 0 : pp_cxx_left_paren (this);
2074 : 0 : expression (IF_COND (t));
2075 : 0 : pp_cxx_right_paren (this);
2076 : 0 : pp_newline_and_indent (this, 2);
2077 : 0 : statement (THEN_CLAUSE (t));
2078 : 0 : pp_newline_and_indent (this, -2);
2079 : 0 : if (ELSE_CLAUSE (t))
2080 : : {
2081 : 0 : tree else_clause = ELSE_CLAUSE (t);
2082 : 0 : pp_cxx_ws_string (this, "else");
2083 : 0 : if (TREE_CODE (else_clause) == IF_STMT)
2084 : 0 : pp_cxx_whitespace (this);
2085 : : else
2086 : 0 : pp_newline_and_indent (this, 2);
2087 : 0 : statement (else_clause);
2088 : 0 : if (TREE_CODE (else_clause) != IF_STMT)
2089 : 0 : pp_newline_and_indent (this, -2);
2090 : : }
2091 : : break;
2092 : :
2093 : 0 : case RANGE_FOR_STMT:
2094 : 0 : pp_cxx_ws_string (this, "for");
2095 : 0 : pp_space (this);
2096 : 0 : pp_cxx_left_paren (this);
2097 : 0 : if (RANGE_FOR_INIT_STMT (t))
2098 : : {
2099 : 0 : statement (RANGE_FOR_INIT_STMT (t));
2100 : 0 : pp_needs_newline (this) = false;
2101 : 0 : pp_cxx_whitespace (this);
2102 : : }
2103 : 0 : statement (RANGE_FOR_DECL (t));
2104 : 0 : pp_space (this);
2105 : 0 : pp_needs_newline (this) = false;
2106 : 0 : pp_colon (this);
2107 : 0 : pp_space (this);
2108 : 0 : statement (RANGE_FOR_EXPR (t));
2109 : 0 : pp_cxx_right_paren (this);
2110 : 0 : pp_newline_and_indent (this, 3);
2111 : 0 : statement (FOR_BODY (t));
2112 : 0 : pp_indentation (this) -= 3;
2113 : 0 : pp_needs_newline (this) = true;
2114 : 0 : break;
2115 : :
2116 : : /* expression-statement:
2117 : : expression(opt) ; */
2118 : 0 : case EXPR_STMT:
2119 : 0 : expression (EXPR_STMT_EXPR (t));
2120 : 0 : pp_cxx_semicolon (this);
2121 : 0 : pp_needs_newline (this) = true;
2122 : 0 : break;
2123 : :
2124 : 0 : case CLEANUP_STMT:
2125 : 0 : pp_cxx_ws_string (this, "try");
2126 : 0 : pp_newline_and_indent (this, 2);
2127 : 0 : statement (CLEANUP_BODY (t));
2128 : 0 : pp_newline_and_indent (this, -2);
2129 : 0 : pp_cxx_ws_string (this, CLEANUP_EH_ONLY (t) ? "catch" : "finally");
2130 : 0 : pp_newline_and_indent (this, 2);
2131 : 0 : statement (CLEANUP_EXPR (t));
2132 : 0 : pp_newline_and_indent (this, -2);
2133 : 0 : break;
2134 : :
2135 : 0 : case STATIC_ASSERT:
2136 : 0 : declaration (t);
2137 : 0 : break;
2138 : :
2139 : 0 : case OMP_DEPOBJ:
2140 : 0 : pp_cxx_ws_string (this, "#pragma omp depobj");
2141 : 0 : pp_space (this);
2142 : 0 : pp_cxx_left_paren (this);
2143 : 0 : expression (OMP_DEPOBJ_DEPOBJ (t));
2144 : 0 : pp_cxx_right_paren (this);
2145 : 0 : if (OMP_DEPOBJ_CLAUSES (t) && OMP_DEPOBJ_CLAUSES (t) != error_mark_node)
2146 : : {
2147 : 0 : if (TREE_CODE (OMP_DEPOBJ_CLAUSES (t)) == OMP_CLAUSE)
2148 : 0 : dump_omp_clauses (this, OMP_DEPOBJ_CLAUSES (t),
2149 : 0 : pp_indentation (this), TDF_NONE);
2150 : : else
2151 : 0 : switch (tree_to_uhwi (OMP_DEPOBJ_CLAUSES (t)))
2152 : : {
2153 : 0 : case OMP_CLAUSE_DEPEND_IN:
2154 : 0 : pp_cxx_ws_string (this, " update(in)");
2155 : 0 : break;
2156 : 0 : case OMP_CLAUSE_DEPEND_INOUT:
2157 : 0 : pp_cxx_ws_string (this, " update(inout)");
2158 : 0 : break;
2159 : 0 : case OMP_CLAUSE_DEPEND_OUT:
2160 : 0 : pp_cxx_ws_string (this, " update(out)");
2161 : 0 : break;
2162 : 0 : case OMP_CLAUSE_DEPEND_MUTEXINOUTSET:
2163 : 0 : pp_cxx_ws_string (this, " update(mutexinoutset)");
2164 : 0 : break;
2165 : 0 : case OMP_CLAUSE_DEPEND_INOUTSET:
2166 : 0 : pp_cxx_ws_string (this, " update(inoutset)");
2167 : 0 : break;
2168 : 0 : case OMP_CLAUSE_DEPEND_LAST:
2169 : 0 : pp_cxx_ws_string (this, " destroy");
2170 : 0 : break;
2171 : : default:
2172 : : break;
2173 : : }
2174 : : }
2175 : 0 : pp_needs_newline (this) = true;
2176 : 0 : break;
2177 : :
2178 : 0 : default:
2179 : 0 : c_pretty_printer::statement (t);
2180 : 0 : break;
2181 : : }
2182 : 0 : }
2183 : :
2184 : : /* original-namespace-definition:
2185 : : namespace identifier { namespace-body }
2186 : :
2187 : : As an edge case, we also handle unnamed namespace definition here. */
2188 : :
2189 : : static void
2190 : 57 : pp_cxx_original_namespace_definition (cxx_pretty_printer *pp, tree t)
2191 : : {
2192 : 57 : pp_cxx_ws_string (pp, "namespace");
2193 : 57 : if (DECL_CONTEXT (t))
2194 : 57 : pp_cxx_nested_name_specifier (pp, DECL_CONTEXT (t));
2195 : 57 : if (DECL_NAME (t))
2196 : 57 : pp_cxx_unqualified_id (pp, t);
2197 : 57 : pp_cxx_whitespace (pp);
2198 : 57 : pp_cxx_left_brace (pp);
2199 : : /* We do not print the namespace-body. */
2200 : 57 : pp_cxx_whitespace (pp);
2201 : 57 : pp_cxx_right_brace (pp);
2202 : 57 : }
2203 : :
2204 : : /* namespace-alias:
2205 : : identifier
2206 : :
2207 : : namespace-alias-definition:
2208 : : namespace identifier = qualified-namespace-specifier ;
2209 : :
2210 : : qualified-namespace-specifier:
2211 : : ::(opt) nested-name-specifier(opt) namespace-name */
2212 : :
2213 : : static void
2214 : 6 : pp_cxx_namespace_alias_definition (cxx_pretty_printer *pp, tree t)
2215 : : {
2216 : 6 : pp_cxx_ws_string (pp, "namespace");
2217 : 6 : if (DECL_CONTEXT (t))
2218 : 6 : pp_cxx_nested_name_specifier (pp, DECL_CONTEXT (t));
2219 : 6 : pp_cxx_unqualified_id (pp, t);
2220 : 6 : pp_cxx_whitespace (pp);
2221 : 6 : pp_equal (pp);
2222 : 6 : pp_cxx_whitespace (pp);
2223 : 6 : if (DECL_CONTEXT (DECL_NAMESPACE_ALIAS (t)))
2224 : 6 : pp_cxx_nested_name_specifier (pp,
2225 : 6 : DECL_CONTEXT (DECL_NAMESPACE_ALIAS (t)));
2226 : 6 : pp_cxx_qualified_id (pp, DECL_NAMESPACE_ALIAS (t));
2227 : 6 : pp_cxx_semicolon (pp);
2228 : 6 : }
2229 : :
2230 : : /* simple-declaration:
2231 : : decl-specifier-seq(opt) init-declarator-list(opt) */
2232 : :
2233 : : static void
2234 : 0 : pp_cxx_simple_declaration (cxx_pretty_printer *pp, tree t)
2235 : : {
2236 : 0 : pp->declaration_specifiers (t);
2237 : 0 : pp_cxx_init_declarator (pp, t);
2238 : 0 : pp_cxx_semicolon (pp);
2239 : 0 : pp_needs_newline (pp) = true;
2240 : 0 : }
2241 : :
2242 : : /*
2243 : : template-parameter-list:
2244 : : template-parameter
2245 : : template-parameter-list , template-parameter */
2246 : :
2247 : : static inline void
2248 : 0 : pp_cxx_template_parameter_list (cxx_pretty_printer *pp, tree t)
2249 : : {
2250 : 0 : const int n = TREE_VEC_LENGTH (t);
2251 : 0 : int i;
2252 : 0 : for (i = 0; i < n; ++i)
2253 : : {
2254 : 0 : if (i)
2255 : 0 : pp_cxx_separate_with (pp, ',');
2256 : 0 : pp_cxx_template_parameter (pp, TREE_VEC_ELT (t, i));
2257 : : }
2258 : 0 : }
2259 : :
2260 : : /* template-parameter:
2261 : : type-parameter
2262 : : parameter-declaration
2263 : :
2264 : : type-parameter:
2265 : : class ...(opt) identifier(opt)
2266 : : class identifier(opt) = type-id
2267 : : typename identifier(opt)
2268 : : typename ...(opt) identifier(opt) = type-id
2269 : : template < template-parameter-list > class ...(opt) identifier(opt)
2270 : : template < template-parameter-list > class identifier(opt) = template-name */
2271 : :
2272 : : static void
2273 : 0 : pp_cxx_template_parameter (cxx_pretty_printer *pp, tree t)
2274 : : {
2275 : 0 : tree parameter = TREE_VALUE (t);
2276 : 0 : switch (TREE_CODE (parameter))
2277 : : {
2278 : 0 : case TYPE_DECL:
2279 : 0 : pp_cxx_ws_string (pp, "class");
2280 : 0 : if (TEMPLATE_TYPE_PARAMETER_PACK (TREE_TYPE (t)))
2281 : 0 : pp_cxx_ws_string (pp, "...");
2282 : 0 : if (DECL_NAME (parameter))
2283 : 0 : pp_cxx_tree_identifier (pp, DECL_NAME (parameter));
2284 : : /* FIXME: Check if we should print also default argument. */
2285 : : break;
2286 : :
2287 : 0 : case PARM_DECL:
2288 : 0 : pp_cxx_parameter_declaration (pp, parameter);
2289 : 0 : break;
2290 : :
2291 : : case TEMPLATE_DECL:
2292 : : break;
2293 : :
2294 : 0 : default:
2295 : 0 : pp_unsupported_tree (pp, t);
2296 : 0 : break;
2297 : : }
2298 : 0 : }
2299 : :
2300 : : /* Pretty-print a template parameter in the canonical form
2301 : : "template-parameter-<level>-<position in parameter list>". */
2302 : :
2303 : : void
2304 : 1828 : pp_cxx_canonical_template_parameter (cxx_pretty_printer *pp, tree parm)
2305 : : {
2306 : 1828 : const enum tree_code code = TREE_CODE (parm);
2307 : :
2308 : : /* Brings type template parameters to the canonical forms. */
2309 : 1828 : if (code == TEMPLATE_TYPE_PARM || code == TEMPLATE_TEMPLATE_PARM
2310 : 1828 : || code == BOUND_TEMPLATE_TEMPLATE_PARM)
2311 : 1117 : parm = TEMPLATE_TYPE_PARM_INDEX (parm);
2312 : :
2313 : 1828 : pp_cxx_begin_template_argument_list (pp);
2314 : 1828 : pp->translate_string ("template-parameter-");
2315 : 1828 : pp_wide_integer (pp, TEMPLATE_PARM_LEVEL (parm));
2316 : 1828 : pp_minus (pp);
2317 : 1828 : pp_wide_integer (pp, TEMPLATE_PARM_IDX (parm) + 1);
2318 : 1828 : pp_cxx_end_template_argument_list (pp);
2319 : 1828 : }
2320 : :
2321 : : /* Print a constrained-type-specifier. */
2322 : :
2323 : : void
2324 : 374 : pp_cxx_constrained_type_spec (cxx_pretty_printer *pp, tree c)
2325 : : {
2326 : 374 : pp_cxx_whitespace (pp);
2327 : 374 : pp_cxx_left_bracket (pp);
2328 : 374 : pp->translate_string ("requires");
2329 : 374 : pp_cxx_whitespace (pp);
2330 : 374 : if (c == error_mark_node)
2331 : : {
2332 : 0 : pp_cxx_ws_string(pp, "<unsatisfied-type-constraint>");
2333 : 0 : return;
2334 : : }
2335 : 374 : tree t, a;
2336 : 374 : placeholder_extract_concept_and_args (c, t, a);
2337 : 374 : pp->id_expression (t);
2338 : 374 : pp_cxx_begin_template_argument_list (pp);
2339 : 374 : pp_cxx_ws_string (pp, "<placeholder>");
2340 : 374 : pp_cxx_separate_with (pp, ',');
2341 : 374 : tree args = make_tree_vec (TREE_VEC_LENGTH (a) - 1);
2342 : 574 : for (int i = 0; i < TREE_VEC_LENGTH (a) - 1; ++i)
2343 : 200 : TREE_VEC_ELT (args, i) = TREE_VEC_ELT (a, i + 1);
2344 : 374 : pp_cxx_template_argument_list (pp, args);
2345 : 374 : ggc_free (args);
2346 : 374 : pp_cxx_end_template_argument_list (pp);
2347 : 374 : pp_cxx_right_bracket (pp);
2348 : : }
2349 : :
2350 : : /*
2351 : : template-declaration:
2352 : : export(opt) template < template-parameter-list > declaration
2353 : :
2354 : : Concept extensions:
2355 : :
2356 : : template-declaration:
2357 : : export(opt) template < template-parameter-list >
2358 : : requires-clause(opt) declaration */
2359 : :
2360 : : static void
2361 : 0 : pp_cxx_template_declaration (cxx_pretty_printer *pp, tree t)
2362 : : {
2363 : 0 : tree tmpl = most_general_template (t);
2364 : 0 : tree level;
2365 : :
2366 : 0 : pp_maybe_newline_and_indent (pp, 0);
2367 : 0 : for (level = DECL_TEMPLATE_PARMS (tmpl); level; level = TREE_CHAIN (level))
2368 : : {
2369 : 0 : pp_cxx_ws_string (pp, "template");
2370 : 0 : pp_cxx_begin_template_argument_list (pp);
2371 : 0 : pp_cxx_template_parameter_list (pp, TREE_VALUE (level));
2372 : 0 : pp_cxx_end_template_argument_list (pp);
2373 : 0 : pp_newline_and_indent (pp, 3);
2374 : : }
2375 : :
2376 : 0 : if (flag_concepts)
2377 : 0 : if (tree ci = get_constraints (t))
2378 : 0 : if (tree reqs = CI_TEMPLATE_REQS (ci))
2379 : : {
2380 : 0 : pp_cxx_requires_clause (pp, reqs);
2381 : 0 : pp_newline_and_indent (pp, 6);
2382 : : }
2383 : :
2384 : 0 : if (TREE_CODE (t) == FUNCTION_DECL && DECL_SAVED_TREE (t))
2385 : 0 : pp_cxx_function_definition (pp, t);
2386 : 0 : else if (TREE_CODE (t) == CONCEPT_DECL)
2387 : 0 : pp_cxx_concept_definition (pp, t);
2388 : : else
2389 : 0 : pp_cxx_simple_declaration (pp, t);
2390 : 0 : }
2391 : :
2392 : : static void
2393 : 0 : pp_cxx_explicit_specialization (cxx_pretty_printer *pp, tree t)
2394 : : {
2395 : 0 : pp_unsupported_tree (pp, t);
2396 : 0 : }
2397 : :
2398 : : static void
2399 : 0 : pp_cxx_explicit_instantiation (cxx_pretty_printer *pp, tree t)
2400 : : {
2401 : 0 : pp_unsupported_tree (pp, t);
2402 : 0 : }
2403 : :
2404 : : static void
2405 : 0 : pp_cxx_concept_definition (cxx_pretty_printer *pp, tree t)
2406 : : {
2407 : 0 : pp_cxx_unqualified_id (pp, DECL_NAME (t));
2408 : 0 : pp_cxx_whitespace (pp);
2409 : 0 : pp_cxx_ws_string (pp, "=");
2410 : 0 : pp_cxx_whitespace (pp);
2411 : 0 : pp->expression (DECL_INITIAL (t));
2412 : 0 : pp_cxx_semicolon (pp);
2413 : 0 : }
2414 : :
2415 : : /*
2416 : : declaration:
2417 : : block-declaration
2418 : : function-definition
2419 : : template-declaration
2420 : : explicit-instantiation
2421 : : explicit-specialization
2422 : : linkage-specification
2423 : : namespace-definition
2424 : :
2425 : : block-declaration:
2426 : : simple-declaration
2427 : : asm-definition
2428 : : namespace-alias-definition
2429 : : using-declaration
2430 : : using-directive
2431 : : static_assert-declaration */
2432 : : void
2433 : 63 : cxx_pretty_printer::declaration (tree t)
2434 : : {
2435 : 63 : if (TREE_CODE (t) == STATIC_ASSERT)
2436 : : {
2437 : 0 : pp_cxx_ws_string (this, "static_assert");
2438 : 0 : pp_cxx_left_paren (this);
2439 : 0 : expression (STATIC_ASSERT_CONDITION (t));
2440 : 0 : pp_cxx_separate_with (this, ',');
2441 : 0 : expression (STATIC_ASSERT_MESSAGE (t));
2442 : 0 : pp_cxx_right_paren (this);
2443 : : }
2444 : 63 : else if (!DECL_LANG_SPECIFIC (t))
2445 : 0 : pp_cxx_simple_declaration (this, t);
2446 : 63 : else if (DECL_USE_TEMPLATE (t))
2447 : 0 : switch (DECL_USE_TEMPLATE (t))
2448 : : {
2449 : 0 : case 1:
2450 : 0 : pp_cxx_template_declaration (this, t);
2451 : 0 : break;
2452 : :
2453 : 0 : case 2:
2454 : 0 : pp_cxx_explicit_specialization (this, t);
2455 : 0 : break;
2456 : :
2457 : 0 : case 3:
2458 : 0 : pp_cxx_explicit_instantiation (this, t);
2459 : 0 : break;
2460 : :
2461 : : default:
2462 : : break;
2463 : : }
2464 : 63 : else switch (TREE_CODE (t))
2465 : : {
2466 : 0 : case VAR_DECL:
2467 : 0 : case TYPE_DECL:
2468 : 0 : pp_cxx_simple_declaration (this, t);
2469 : 0 : break;
2470 : :
2471 : 0 : case FUNCTION_DECL:
2472 : 0 : if (DECL_SAVED_TREE (t))
2473 : 0 : pp_cxx_function_definition (this, t);
2474 : : else
2475 : 0 : pp_cxx_simple_declaration (this, t);
2476 : : break;
2477 : :
2478 : 63 : case NAMESPACE_DECL:
2479 : 63 : if (DECL_NAMESPACE_ALIAS (t))
2480 : 6 : pp_cxx_namespace_alias_definition (this, t);
2481 : : else
2482 : 57 : pp_cxx_original_namespace_definition (this, t);
2483 : : break;
2484 : :
2485 : 0 : default:
2486 : 0 : pp_unsupported_tree (this, t);
2487 : 0 : break;
2488 : : }
2489 : 63 : }
2490 : :
2491 : : static void
2492 : 3 : pp_cxx_typeid_expression (cxx_pretty_printer *pp, tree t)
2493 : : {
2494 : 3 : t = TREE_OPERAND (t, 0);
2495 : 3 : pp_cxx_ws_string (pp, "typeid");
2496 : 3 : pp_cxx_left_paren (pp);
2497 : 3 : if (TYPE_P (t))
2498 : 3 : pp->type_id (t);
2499 : : else
2500 : 0 : pp->expression (t);
2501 : 3 : pp_cxx_right_paren (pp);
2502 : 3 : }
2503 : :
2504 : : void
2505 : 3 : pp_cxx_va_arg_expression (cxx_pretty_printer *pp, tree t)
2506 : : {
2507 : 3 : pp_cxx_ws_string (pp, "va_arg");
2508 : 3 : pp_cxx_left_paren (pp);
2509 : 3 : pp->assignment_expression (TREE_OPERAND (t, 0));
2510 : 3 : pp_cxx_separate_with (pp, ',');
2511 : 3 : pp->type_id (TREE_TYPE (t));
2512 : 3 : pp_cxx_right_paren (pp);
2513 : 3 : }
2514 : :
2515 : : static bool
2516 : 45 : pp_cxx_offsetof_expression_1 (cxx_pretty_printer *pp, tree t)
2517 : : {
2518 : 45 : switch (TREE_CODE (t))
2519 : : {
2520 : 15 : case ARROW_EXPR:
2521 : 15 : if (TREE_CODE (TREE_OPERAND (t, 0)) == STATIC_CAST_EXPR
2522 : 15 : && INDIRECT_TYPE_P (TREE_TYPE (TREE_OPERAND (t, 0))))
2523 : : {
2524 : 15 : pp->type_id (TREE_TYPE (TREE_TYPE (TREE_OPERAND (t, 0))));
2525 : 15 : pp_cxx_separate_with (pp, ',');
2526 : 15 : return true;
2527 : : }
2528 : : return false;
2529 : 24 : case COMPONENT_REF:
2530 : 24 : if (!pp_cxx_offsetof_expression_1 (pp, TREE_OPERAND (t, 0)))
2531 : : return false;
2532 : 24 : if (TREE_CODE (TREE_OPERAND (t, 0)) != ARROW_EXPR)
2533 : 9 : pp_cxx_dot (pp);
2534 : 24 : pp->expression (TREE_OPERAND (t, 1));
2535 : 24 : return true;
2536 : 6 : case ARRAY_REF:
2537 : 6 : if (!pp_cxx_offsetof_expression_1 (pp, TREE_OPERAND (t, 0)))
2538 : : return false;
2539 : 6 : pp_left_bracket (pp);
2540 : 6 : pp->expression (TREE_OPERAND (t, 1));
2541 : 6 : pp_right_bracket (pp);
2542 : 6 : return true;
2543 : : default:
2544 : : return false;
2545 : : }
2546 : : }
2547 : :
2548 : : void
2549 : 15 : pp_cxx_offsetof_expression (cxx_pretty_printer *pp, tree t)
2550 : : {
2551 : 15 : pp_cxx_ws_string (pp, "offsetof");
2552 : 15 : pp_cxx_left_paren (pp);
2553 : 15 : if (!pp_cxx_offsetof_expression_1 (pp, TREE_OPERAND (t, 0)))
2554 : 0 : pp->expression (TREE_OPERAND (t, 0));
2555 : 15 : pp_cxx_right_paren (pp);
2556 : 15 : }
2557 : :
2558 : : void
2559 : 0 : pp_cxx_addressof_expression (cxx_pretty_printer *pp, tree t)
2560 : : {
2561 : 0 : pp_cxx_ws_string (pp, "__builtin_addressof");
2562 : 0 : pp_cxx_left_paren (pp);
2563 : 0 : pp->expression (TREE_OPERAND (t, 0));
2564 : 0 : pp_cxx_right_paren (pp);
2565 : 0 : }
2566 : :
2567 : : static char const*
2568 : 1493 : get_fold_operator (tree t)
2569 : : {
2570 : 1493 : ovl_op_info_t *info = OVL_OP_INFO (FOLD_EXPR_MODIFY_P (t),
2571 : : FOLD_EXPR_OP (t));
2572 : 1493 : return info->name;
2573 : : }
2574 : :
2575 : : void
2576 : 260 : pp_cxx_unary_left_fold_expression (cxx_pretty_printer *pp, tree t)
2577 : : {
2578 : 260 : char const* op = get_fold_operator (t);
2579 : 260 : tree expr = PACK_EXPANSION_PATTERN (FOLD_EXPR_PACK (t));
2580 : 260 : pp_cxx_left_paren (pp);
2581 : 260 : pp_cxx_ws_string (pp, "...");
2582 : 260 : pp_cxx_ws_string (pp, op);
2583 : 260 : pp->expression (expr);
2584 : 260 : pp_cxx_right_paren (pp);
2585 : 260 : }
2586 : :
2587 : : void
2588 : 1233 : pp_cxx_unary_right_fold_expression (cxx_pretty_printer *pp, tree t)
2589 : : {
2590 : 1233 : char const* op = get_fold_operator (t);
2591 : 1233 : tree expr = PACK_EXPANSION_PATTERN (FOLD_EXPR_PACK (t));
2592 : 1233 : pp_cxx_left_paren (pp);
2593 : 1233 : pp->expression (expr);
2594 : 1233 : pp_space (pp);
2595 : 1233 : pp_cxx_ws_string (pp, op);
2596 : 1233 : pp_cxx_ws_string (pp, "...");
2597 : 1233 : pp_cxx_right_paren (pp);
2598 : 1233 : }
2599 : :
2600 : : void
2601 : 0 : pp_cxx_binary_fold_expression (cxx_pretty_printer *pp, tree t)
2602 : : {
2603 : 0 : char const* op = get_fold_operator (t);
2604 : 0 : tree t1 = TREE_OPERAND (t, 1);
2605 : 0 : tree t2 = TREE_OPERAND (t, 2);
2606 : 0 : if (t1 == FOLD_EXPR_PACK (t))
2607 : 0 : t1 = PACK_EXPANSION_PATTERN (t1);
2608 : : else
2609 : 0 : t2 = PACK_EXPANSION_PATTERN (t2);
2610 : 0 : pp_cxx_left_paren (pp);
2611 : 0 : pp->expression (t1);
2612 : 0 : pp_cxx_ws_string (pp, op);
2613 : 0 : pp_cxx_ws_string (pp, "...");
2614 : 0 : pp_cxx_ws_string (pp, op);
2615 : 0 : pp->expression (t2);
2616 : 0 : pp_cxx_right_paren (pp);
2617 : 0 : }
2618 : :
2619 : : void
2620 : 281 : pp_cxx_trait (cxx_pretty_printer *pp, tree t)
2621 : : {
2622 : 281 : cp_trait_kind kind;
2623 : 281 : tree type1, type2;
2624 : 281 : if (TREE_CODE (t) == TRAIT_EXPR)
2625 : : {
2626 : 215 : kind = TRAIT_EXPR_KIND (t);
2627 : 215 : type1 = TRAIT_EXPR_TYPE1 (t);
2628 : 215 : type2 = TRAIT_EXPR_TYPE2 (t);
2629 : : }
2630 : : else
2631 : : {
2632 : 66 : kind = TRAIT_TYPE_KIND (t);
2633 : 66 : type1 = TRAIT_TYPE_TYPE1 (t);
2634 : 66 : type2 = TRAIT_TYPE_TYPE2 (t);
2635 : : }
2636 : :
2637 : 281 : switch (kind)
2638 : : {
2639 : : #define DEFTRAIT(TCC, CODE, NAME, ARITY) \
2640 : : case CPTK_##CODE: \
2641 : : pp_cxx_ws_string (pp, NAME); \
2642 : : break;
2643 : : #include "cp-trait.def"
2644 : : #undef DEFTRAIT
2645 : : }
2646 : :
2647 : 281 : if (kind == CPTK_TYPE_PACK_ELEMENT)
2648 : : {
2649 : 9 : pp_cxx_begin_template_argument_list (pp);
2650 : 9 : pp->expression (type1);
2651 : : }
2652 : : else
2653 : : {
2654 : 272 : pp_cxx_left_paren (pp);
2655 : 272 : if (TYPE_P (type1))
2656 : 197 : pp->type_id (type1);
2657 : : else
2658 : 75 : pp->expression (type1);
2659 : : }
2660 : 281 : if (type2)
2661 : : {
2662 : 173 : if (TREE_CODE (type2) != TREE_VEC)
2663 : : {
2664 : 159 : pp_cxx_separate_with (pp, ',');
2665 : 159 : pp->type_id (type2);
2666 : : }
2667 : : else
2668 : 28 : for (tree arg : tree_vec_range (type2))
2669 : : {
2670 : 14 : pp_cxx_separate_with (pp, ',');
2671 : 14 : pp->type_id (arg);
2672 : : }
2673 : : }
2674 : 281 : if (kind == CPTK_TYPE_PACK_ELEMENT)
2675 : 9 : pp_cxx_end_template_argument_list (pp);
2676 : : else
2677 : 272 : pp_cxx_right_paren (pp);
2678 : 281 : }
2679 : :
2680 : : // requires-clause:
2681 : : // 'requires' logical-or-expression
2682 : : void
2683 : 7984 : pp_cxx_requires_clause (cxx_pretty_printer *pp, tree t)
2684 : : {
2685 : 7984 : if (!t)
2686 : : return;
2687 : 7984 : pp->set_padding (pp_before);
2688 : 7984 : pp_cxx_ws_string (pp, "requires");
2689 : 7984 : pp_space (pp);
2690 : 7984 : pp->expression (t);
2691 : : }
2692 : :
2693 : : /* requirement:
2694 : : simple-requirement
2695 : : compound-requirement
2696 : : type-requirement
2697 : : nested-requirement */
2698 : : static void
2699 : 187 : pp_cxx_requirement (cxx_pretty_printer *pp, tree t)
2700 : : {
2701 : 187 : switch (TREE_CODE (t))
2702 : : {
2703 : 116 : case SIMPLE_REQ:
2704 : 116 : pp_cxx_simple_requirement (pp, t);
2705 : 116 : break;
2706 : :
2707 : 6 : case TYPE_REQ:
2708 : 6 : pp_cxx_type_requirement (pp, t);
2709 : 6 : break;
2710 : :
2711 : 20 : case COMPOUND_REQ:
2712 : 20 : pp_cxx_compound_requirement (pp, t);
2713 : 20 : break;
2714 : :
2715 : 45 : case NESTED_REQ:
2716 : 45 : pp_cxx_nested_requirement (pp, t);
2717 : 45 : break;
2718 : :
2719 : 0 : default:
2720 : 0 : gcc_unreachable ();
2721 : : }
2722 : 187 : }
2723 : :
2724 : : // requirement-list:
2725 : : // requirement
2726 : : // requirement-list ';' requirement[opt]
2727 : : //
2728 : : static void
2729 : 187 : pp_cxx_requirement_list (cxx_pretty_printer *pp, tree t)
2730 : : {
2731 : 374 : for (; t; t = TREE_CHAIN (t))
2732 : 187 : pp_cxx_requirement (pp, TREE_VALUE (t));
2733 : 187 : }
2734 : :
2735 : : // requirement-body:
2736 : : // '{' requirement-list '}'
2737 : : static void
2738 : 187 : pp_cxx_requirement_body (cxx_pretty_printer *pp, tree t)
2739 : : {
2740 : 187 : pp_cxx_left_brace (pp);
2741 : 187 : pp_cxx_requirement_list (pp, t);
2742 : 187 : pp_cxx_right_brace (pp);
2743 : 187 : }
2744 : :
2745 : : // requires-expression:
2746 : : // 'requires' requirement-parameter-list requirement-body
2747 : : void
2748 : 187 : pp_cxx_requires_expr (cxx_pretty_printer *pp, tree t)
2749 : : {
2750 : 187 : pp_string (pp, "requires");
2751 : 187 : if (tree parms = REQUIRES_EXPR_PARMS (t))
2752 : : {
2753 : 80 : bool first = true;
2754 : 80 : pp_cxx_left_paren (pp);
2755 : 287 : for (; parms; parms = TREE_CHAIN (parms))
2756 : : {
2757 : 127 : if (!first)
2758 : 47 : pp_cxx_separate_with (pp, ',' );
2759 : 127 : first = false;
2760 : 127 : pp_cxx_parameter_declaration (pp, parms);
2761 : : }
2762 : 80 : pp_cxx_right_paren (pp);
2763 : 80 : pp_cxx_whitespace (pp);
2764 : : }
2765 : 187 : pp_cxx_requirement_body (pp, TREE_OPERAND (t, 1));
2766 : 187 : }
2767 : :
2768 : : /* simple-requirement:
2769 : : expression ';' */
2770 : : void
2771 : 116 : pp_cxx_simple_requirement (cxx_pretty_printer *pp, tree t)
2772 : : {
2773 : 116 : pp->expression (TREE_OPERAND (t, 0));
2774 : 116 : pp_cxx_semicolon (pp);
2775 : 116 : }
2776 : :
2777 : : /* type-requirement:
2778 : : typename type-name ';' */
2779 : : void
2780 : 6 : pp_cxx_type_requirement (cxx_pretty_printer *pp, tree t)
2781 : : {
2782 : 6 : pp->type_id (TREE_OPERAND (t, 0));
2783 : 6 : pp_cxx_semicolon (pp);
2784 : 6 : }
2785 : :
2786 : : /* compound-requirement:
2787 : : '{' expression '}' 'noexcept' [opt] trailing-return-type [opt] */
2788 : : void
2789 : 20 : pp_cxx_compound_requirement (cxx_pretty_printer *pp, tree t)
2790 : : {
2791 : 20 : pp_cxx_left_brace (pp);
2792 : 20 : pp->expression (TREE_OPERAND (t, 0));
2793 : 20 : pp_cxx_right_brace (pp);
2794 : :
2795 : 20 : if (COMPOUND_REQ_NOEXCEPT_P (t))
2796 : 0 : pp_cxx_ws_string (pp, "noexcept");
2797 : :
2798 : 20 : if (tree type = TREE_OPERAND (t, 1))
2799 : : {
2800 : 20 : pp_cxx_whitespace (pp);
2801 : 20 : pp_cxx_ws_string (pp, "->");
2802 : 20 : pp->type_id (type);
2803 : : }
2804 : 20 : pp_cxx_semicolon (pp);
2805 : 20 : }
2806 : :
2807 : : /* nested requirement:
2808 : : 'requires' constraint-expression */
2809 : : void
2810 : 45 : pp_cxx_nested_requirement (cxx_pretty_printer *pp, tree t)
2811 : : {
2812 : 45 : pp_cxx_ws_string (pp, "requires");
2813 : 45 : pp->expression (TREE_OPERAND (t, 0));
2814 : 45 : pp_cxx_semicolon (pp);
2815 : 45 : }
2816 : :
2817 : : /* Output the "[with ...]" clause for a parameter mapping of an atomic
2818 : : constraint. */
2819 : :
2820 : : void
2821 : 1445 : pp_cxx_parameter_mapping (cxx_pretty_printer *pp, tree map)
2822 : : {
2823 : 1445 : pp_cxx_whitespace (pp);
2824 : 1445 : pp_cxx_left_bracket (pp);
2825 : 1445 : pp->translate_string ("with");
2826 : 1445 : pp_cxx_whitespace (pp);
2827 : :
2828 : 3347 : for (tree p = map; p; p = TREE_CHAIN (p))
2829 : : {
2830 : 1902 : tree parm = TREE_VALUE (p);
2831 : 1902 : tree arg = TREE_PURPOSE (p);
2832 : :
2833 : 1902 : if (TYPE_P (parm))
2834 : 1809 : pp->type_id (parm);
2835 : 93 : else if (tree name = DECL_NAME (TEMPLATE_PARM_DECL (parm)))
2836 : 89 : pp_cxx_tree_identifier (pp, name);
2837 : : else
2838 : 4 : pp->translate_string ("<unnamed>");
2839 : :
2840 : 1902 : pp_cxx_whitespace (pp);
2841 : 1902 : pp_equal (pp);
2842 : 1902 : pp_cxx_whitespace (pp);
2843 : :
2844 : 1902 : if (TYPE_P (arg) || DECL_TEMPLATE_TEMPLATE_PARM_P (arg))
2845 : 1806 : pp->type_id (arg);
2846 : : else
2847 : 96 : pp->expression (arg);
2848 : :
2849 : 1902 : if (TREE_CHAIN (p) != NULL_TREE)
2850 : 457 : pp_cxx_separate_with (pp, ';');
2851 : : }
2852 : :
2853 : 1445 : pp_cxx_right_bracket (pp);
2854 : 1445 : }
2855 : :
2856 : : void
2857 : 424 : pp_cxx_atomic_constraint (cxx_pretty_printer *pp, tree t)
2858 : : {
2859 : : /* Emit the expression. */
2860 : 424 : pp->expression (ATOMIC_CONSTR_EXPR (t));
2861 : :
2862 : : /* Emit the parameter mapping. */
2863 : 424 : tree map = ATOMIC_CONSTR_MAP (t);
2864 : 424 : if (map && map != error_mark_node)
2865 : 323 : pp_cxx_parameter_mapping (pp, map);
2866 : 424 : }
2867 : :
2868 : : void
2869 : 0 : pp_cxx_conjunction (cxx_pretty_printer *pp, tree t)
2870 : : {
2871 : 0 : pp_cxx_constraint (pp, TREE_OPERAND (t, 0));
2872 : 0 : pp_string (pp, " /\\ ");
2873 : 0 : pp_cxx_constraint (pp, TREE_OPERAND (t, 1));
2874 : 0 : }
2875 : :
2876 : : void
2877 : 0 : pp_cxx_disjunction (cxx_pretty_printer *pp, tree t)
2878 : : {
2879 : 0 : pp_cxx_constraint (pp, TREE_OPERAND (t, 0));
2880 : 0 : pp_string (pp, " \\/ ");
2881 : 0 : pp_cxx_constraint (pp, TREE_OPERAND (t, 1));
2882 : 0 : }
2883 : :
2884 : : void
2885 : 424 : pp_cxx_constraint (cxx_pretty_printer *pp, tree t)
2886 : : {
2887 : 424 : if (t == error_mark_node)
2888 : 0 : return pp->expression (t);
2889 : :
2890 : 424 : switch (TREE_CODE (t))
2891 : : {
2892 : 424 : case ATOMIC_CONSTR:
2893 : 424 : pp_cxx_atomic_constraint (pp, t);
2894 : 424 : break;
2895 : :
2896 : 0 : case CONJ_CONSTR:
2897 : 0 : pp_cxx_conjunction (pp, t);
2898 : 0 : break;
2899 : :
2900 : 0 : case DISJ_CONSTR:
2901 : 0 : pp_cxx_disjunction (pp, t);
2902 : 0 : break;
2903 : :
2904 : 0 : case EXPR_PACK_EXPANSION:
2905 : 0 : pp->expression (TREE_OPERAND (t, 0));
2906 : 0 : break;
2907 : :
2908 : 0 : default:
2909 : 0 : gcc_unreachable ();
2910 : : }
2911 : : }
2912 : :
2913 : :
2914 : : typedef c_pretty_print_fn pp_fun;
2915 : :
2916 : : /* Initialization of a C++ pretty-printer object. */
2917 : :
2918 : 184304 : cxx_pretty_printer::cxx_pretty_printer ()
2919 : : : c_pretty_printer (),
2920 : 184304 : enclosing_scope (global_namespace)
2921 : : {
2922 : 184304 : type_specifier_seq = (pp_fun) pp_cxx_type_specifier_seq;
2923 : 184304 : parameter_list = (pp_fun) pp_cxx_parameter_declaration_clause;
2924 : 184304 : }
2925 : :
2926 : : /* cxx_pretty_printer's implementation of pretty_printer::clone vfunc. */
2927 : :
2928 : : pretty_printer *
2929 : 18814 : cxx_pretty_printer::clone () const
2930 : : {
2931 : 18814 : return new cxx_pretty_printer (*this);
2932 : : }
|
