gdb/gdb/ada-typeprint.c

347    recursion (indentation) level, in case the element type itself has
353 		  int level)
415 		  show == 0 ? 0 : show - 1, level + 1);
493    (indentation) level, in case any of the fields themselves have
496    variant part are taken to be at the same level as the fields
502 		       int show, int level)
524       fprintf_filtered (stream, "\n%*swhen ", level + 4, "");
528 				    outer_type, stream, show, level + 4) <= 0)
535    on STREAM.  LEVEL is the recursion (indentation) level, in case any of
539    level as the fields immediately outside the variant part. */
543 		    struct ui_file *stream, int show, int level)
545   fprintf_filtered (stream, "\n%*scase %s is", level + 4, "",
549 			 level + 4);
550   fprintf_filtered (stream, "\n%*send case;", level + 4, "");
555    level, in case any of the fields themselves have nested structure,
564 			  struct ui_file *stream, int show, int level)
582 					  stream, show, level);
585 	  print_variant_part (type, i, outer_type, stream, show, level);
591 	  fprintf_filtered (stream, "\n%*s", level + 4, "");
594 			  stream, show - 1, level + 4);
603    level, in case the element type itself has nested structure, and SHOW is
608 		   int level)
639 					  stream, show, level);
640       flds += print_record_field_types (type, type, stream, show, level);
643 	fprintf_filtered (stream, "\n%*send record", level, "");
652    format on STREAM. LEVEL is the recursion (indentation) level
657 			    int show, int level)
669       fprintf_filtered (stream, "\n%*scase ? is", level + 4, "");
673 	  fprintf_filtered (stream, "\n%*swhen ? =>\n%*s", level + 8, "",
674 			    level + 12, "");
677 			  stream, show - 1, level + 12);
682 			level + 4, "", level, "");
736       when there is a type name for the SHOWth deepest level (0th is
737       outer level).
739    LEVEL indicates level of recursion (for nested definitions). */
743 		int show, int level)
775     ada_print_type (ada_aligned_type (type), "", stream, show, level);
777     print_array_type (type, stream, show, level);
783 	c_print_type (type, "", stream, show, level);
788 	ada_print_type (TYPE_TARGET_TYPE (type), "", stream, show, level);
792 	ada_print_type (TYPE_TARGET_TYPE (type), "", stream, show, level);
795 	print_array_type (type, stream, show, level);
839 	  print_array_type (type, stream, show, level);
844 	  print_record_type (type, stream, show, level);
847 	print_unchecked_union_type (type, stream, show, level);