diff options
Diffstat (limited to 'gdb/ada-typeprint.c')
-rw-r--r-- | gdb/ada-typeprint.c | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/gdb/ada-typeprint.c b/gdb/ada-typeprint.c index 6139edd3c99..677a6aa4fcb 100644 --- a/gdb/ada-typeprint.c +++ b/gdb/ada-typeprint.c @@ -402,11 +402,10 @@ print_array_type (struct type *type, struct ui_file *stream, int show, /* Print the choices encoded by field FIELD_NUM of variant-part TYPE on STREAM, assuming that VAL_TYPE (if non-NULL) is the type of the - values. Returns non-zero if the field is an encoding of + values. Return non-zero if the field is an encoding of discriminant values, as in a standard variant record, and 0 if the field is not so encoded (as happens with single-component variants - in types annotated with pragma Unchecked_Variant.) - */ + in types annotated with pragma Unchecked_Variant). */ static int print_choices (struct type *type, int field_num, struct ui_file *stream, @@ -553,7 +552,7 @@ print_variant_part (struct type *type, int field_num, struct type *outer_type, LEVEL is the recursion (indentation) level, in case any of the fields themselves have nested structure, and SHOW is the number of levels of internal structure to show (see ada_print_type). Does - not print parent type information of TYPE. Returns 0 if no fields + not print parent type information of TYPE. Returns 0 if no fields printed, -1 for an incomplete type, else > 0. Prints each field beginning on a new line, but does not put a new line at end. */ |