X-Git-Url: http://git.efficios.com/?a=blobdiff_plain;f=gdb%2Ftypeprint.c;h=ded8096c630fbb5c8b0f925490f2f7cc679287aa;hb=29298bf66f62f2f6c1efb0685623fbc29dfade90;hp=026f3a254e68201abc16bfccda644b1d3cdda80b;hpb=635c7e8a0521e985921ea3189ab2db5e05fdd41f;p=deliverable%2Fbinutils-gdb.git diff --git a/gdb/typeprint.c b/gdb/typeprint.c index 026f3a254e..ded8096c63 100644 --- a/gdb/typeprint.c +++ b/gdb/typeprint.c @@ -1,6 +1,6 @@ /* Language independent support for printing types for GDB, the GNU debugger. - Copyright (C) 1986-2014 Free Software Foundation, Inc. + Copyright (C) 1986-2019 Free Software Foundation, Inc. This file is part of GDB. @@ -31,28 +31,20 @@ #include "language.h" #include "cp-abi.h" #include "typeprint.h" -#include -#include "exceptions.h" #include "valprint.h" -#include #include #include "cli/cli-utils.h" #include "extension.h" #include "completer.h" - -extern void _initialize_typeprint (void); - -static void ptype_command (char *, int); - -static void whatis_command (char *, int); - -static void whatis_exp (char *, int); +#include "cli/cli-style.h" const struct type_print_options type_print_raw_options = { 1, /* raw */ 1, /* print_methods */ 1, /* print_typedefs */ + 0, /* print_offsets */ + 0, /* print_nested_type_limit */ NULL, /* local_typedefs */ NULL, /* global_table */ NULL /* global_printers */ @@ -65,6 +57,8 @@ static struct type_print_options default_ptype_flags = 0, /* raw */ 1, /* print_methods */ 1, /* print_typedefs */ + 0, /* print_offsets */ + 0, /* print_nested_type_limit */ NULL, /* local_typedefs */ NULL, /* global_table */ NULL /* global_printers */ @@ -72,25 +66,121 @@ static struct type_print_options default_ptype_flags = -/* A hash table holding typedef_field objects. This is more - complicated than an ordinary hash because it must also track the - lifetime of some -- but not all -- of the contained objects. */ +/* See typeprint.h. */ + +const int print_offset_data::indentation = 23; -struct typedef_hash_table + +/* See typeprint.h. */ + +void +print_offset_data::maybe_print_hole (struct ui_file *stream, + unsigned int bitpos, + const char *for_what) +{ + /* We check for END_BITPOS > 0 because there is a specific + scenario when END_BITPOS can be zero and BITPOS can be > + 0: when we are dealing with a struct/class with a virtual method. + Because of the vtable, the first field of the struct/class will + have an offset of sizeof (void *) (the size of the vtable). If + we do not check for END_BITPOS > 0 here, GDB will report + a hole before the first field, which is not accurate. */ + if (end_bitpos > 0 && end_bitpos < bitpos) + { + /* If END_BITPOS is smaller than the current type's + bitpos, it means there's a hole in the struct, so we report + it here. */ + unsigned int hole = bitpos - end_bitpos; + unsigned int hole_byte = hole / TARGET_CHAR_BIT; + unsigned int hole_bit = hole % TARGET_CHAR_BIT; + + if (hole_bit > 0) + fprintf_filtered (stream, "/* XXX %2u-bit %s */\n", hole_bit, + for_what); + + if (hole_byte > 0) + fprintf_filtered (stream, "/* XXX %2u-byte %s */\n", hole_byte, + for_what); + } +} + +/* See typeprint.h. */ + +void +print_offset_data::update (struct type *type, unsigned int field_idx, + struct ui_file *stream) { - /* The actual hash table. */ - htab_t table; + if (field_is_static (&TYPE_FIELD (type, field_idx))) + { + print_spaces_filtered (indentation, stream); + return; + } - /* Storage for typedef_field objects that must be synthesized. */ - struct obstack storage; -}; + struct type *ftype = check_typedef (TYPE_FIELD_TYPE (type, field_idx)); + if (TYPE_CODE (type) == TYPE_CODE_UNION) + { + /* Since union fields don't have the concept of offsets, we just + print their sizes. */ + fprintf_filtered (stream, "/* %4s */", + pulongest (TYPE_LENGTH (ftype))); + return; + } + + unsigned int bitpos = TYPE_FIELD_BITPOS (type, field_idx); + unsigned int fieldsize_byte = TYPE_LENGTH (ftype); + unsigned int fieldsize_bit = fieldsize_byte * TARGET_CHAR_BIT; + + maybe_print_hole (stream, bitpos, "hole"); + + if (TYPE_FIELD_PACKED (type, field_idx) + || offset_bitpos % TARGET_CHAR_BIT != 0) + { + /* We're dealing with a bitfield. Print the bit offset. */ + fieldsize_bit = TYPE_FIELD_BITSIZE (type, field_idx); + + unsigned real_bitpos = bitpos + offset_bitpos; + + fprintf_filtered (stream, "/* %4u:%2u", real_bitpos / TARGET_CHAR_BIT, + real_bitpos % TARGET_CHAR_BIT); + } + else + { + /* The position of the field, relative to the beginning of the + struct. */ + fprintf_filtered (stream, "/* %4u", + (bitpos + offset_bitpos) / TARGET_CHAR_BIT); + + fprintf_filtered (stream, " "); + } + + fprintf_filtered (stream, " | %4u */", fieldsize_byte); + + end_bitpos = bitpos + fieldsize_bit; +} + +/* See typeprint.h. */ + +void +print_offset_data::finish (struct type *type, int level, + struct ui_file *stream) +{ + unsigned int bitpos = TYPE_LENGTH (type) * TARGET_CHAR_BIT; + maybe_print_hole (stream, bitpos, "padding"); + + fputs_filtered ("\n", stream); + print_spaces_filtered (level + 4 + print_offset_data::indentation, stream); + fprintf_filtered (stream, "/* total size (bytes): %4s */\n", + pulongest (TYPE_LENGTH (type))); +} + + /* A hash function for a typedef_field. */ static hashval_t hash_typedef_field (const void *p) { - const struct typedef_field *tf = p; + const struct decl_field *tf = (const struct decl_field *) p; struct type *t = check_typedef (tf->type); return htab_hash_string (TYPE_SAFE_NAME (t)); @@ -101,29 +191,25 @@ hash_typedef_field (const void *p) static int eq_typedef_field (const void *a, const void *b) { - const struct typedef_field *tfa = a; - const struct typedef_field *tfb = b; + const struct decl_field *tfa = (const struct decl_field *) a; + const struct decl_field *tfb = (const struct decl_field *) b; return types_equal (tfa->type, tfb->type); } -/* Add typedefs from T to the hash table TABLE. */ +/* See typeprint.h. */ void -recursively_update_typedef_hash (struct typedef_hash_table *table, - struct type *t) +typedef_hash_table::recursively_update (struct type *t) { int i; - if (table == NULL) - return; - for (i = 0; i < TYPE_TYPEDEF_FIELD_COUNT (t); ++i) { - struct typedef_field *tdef = &TYPE_TYPEDEF_FIELD (t, i); + struct decl_field *tdef = &TYPE_TYPEDEF_FIELD (t, i); void **slot; - slot = htab_find_slot (table->table, tdef, INSERT); + slot = htab_find_slot (m_table, tdef, INSERT); /* Only add a given typedef name once. Really this shouldn't happen; but it is safe enough to do the updates breadth-first and thus use the most specific typedef. */ @@ -133,88 +219,56 @@ recursively_update_typedef_hash (struct typedef_hash_table *table, /* Recurse into superclasses. */ for (i = 0; i < TYPE_N_BASECLASSES (t); ++i) - recursively_update_typedef_hash (table, TYPE_BASECLASS (t, i)); + recursively_update (TYPE_BASECLASS (t, i)); } -/* Add template parameters from T to the typedef hash TABLE. */ +/* See typeprint.h. */ void -add_template_parameters (struct typedef_hash_table *table, struct type *t) +typedef_hash_table::add_template_parameters (struct type *t) { int i; - if (table == NULL) - return; - for (i = 0; i < TYPE_N_TEMPLATE_ARGUMENTS (t); ++i) { - struct typedef_field *tf; + struct decl_field *tf; void **slot; /* We only want type-valued template parameters in the hash. */ if (SYMBOL_CLASS (TYPE_TEMPLATE_ARGUMENT (t, i)) != LOC_TYPEDEF) continue; - tf = XOBNEW (&table->storage, struct typedef_field); - tf->name = SYMBOL_LINKAGE_NAME (TYPE_TEMPLATE_ARGUMENT (t, i)); + tf = XOBNEW (&m_storage, struct decl_field); + tf->name = TYPE_TEMPLATE_ARGUMENT (t, i)->linkage_name (); tf->type = SYMBOL_TYPE (TYPE_TEMPLATE_ARGUMENT (t, i)); - slot = htab_find_slot (table->table, tf, INSERT); + slot = htab_find_slot (m_table, tf, INSERT); if (*slot == NULL) *slot = tf; } } -/* Create a new typedef-lookup hash table. */ +/* See typeprint.h. */ -struct typedef_hash_table * -create_typedef_hash (void) +typedef_hash_table::typedef_hash_table () { - struct typedef_hash_table *result; - - result = XNEW (struct typedef_hash_table); - result->table = htab_create_alloc (10, hash_typedef_field, eq_typedef_field, - NULL, xcalloc, xfree); - obstack_init (&result->storage); - - return result; + m_table = htab_create_alloc (10, hash_typedef_field, eq_typedef_field, + NULL, xcalloc, xfree); } /* Free a typedef field table. */ -void -free_typedef_hash (struct typedef_hash_table *table) +typedef_hash_table::~typedef_hash_table () { - if (table != NULL) - { - htab_delete (table->table); - obstack_free (&table->storage, NULL); - xfree (table); - } + htab_delete (m_table); } -/* A cleanup for freeing a typedef_hash_table. */ - -static void -do_free_typedef_hash (void *arg) -{ - free_typedef_hash (arg); -} - -/* Return a new cleanup that frees TABLE. */ - -struct cleanup * -make_cleanup_free_typedef_hash (struct typedef_hash_table *table) -{ - return make_cleanup (do_free_typedef_hash, table); -} - -/* Helper function for copy_typedef_hash. */ +/* Helper function for typedef_hash_table::copy. */ static int copy_typedef_hash_element (void **slot, void *nt) { - htab_t new_table = nt; + htab_t new_table = (htab_t) nt; void **new_slot; new_slot = htab_find_slot (new_table, *slot, INSERT); @@ -224,42 +278,14 @@ copy_typedef_hash_element (void **slot, void *nt) return 1; } -/* Copy a typedef hash. */ - -struct typedef_hash_table * -copy_typedef_hash (struct typedef_hash_table *table) -{ - struct typedef_hash_table *result; - - if (table == NULL) - return NULL; - - result = create_typedef_hash (); - htab_traverse_noresize (table->table, copy_typedef_hash_element, - result->table); - return result; -} - -/* A cleanup to free the global typedef hash. */ +/* See typeprint.h. */ -static void -do_free_global_table (void *arg) +typedef_hash_table::typedef_hash_table (const typedef_hash_table &table) { - struct type_print_options *flags = arg; - - free_typedef_hash (flags->global_typedefs); - free_ext_lang_type_printers (flags->global_printers); -} - -/* Create the global typedef hash. */ - -static struct cleanup * -create_global_typedef_table (struct type_print_options *flags) -{ - gdb_assert (flags->global_typedefs == NULL && flags->global_printers == NULL); - flags->global_typedefs = create_typedef_hash (); - flags->global_printers = start_ext_lang_type_printers (); - return make_cleanup (do_free_global_table, flags); + m_table = htab_create_alloc (10, hash_typedef_field, eq_typedef_field, + NULL, xcalloc, xfree); + htab_traverse_noresize (table.m_table, copy_typedef_hash_element, + m_table); } /* Look up the type T in the global typedef hash. If it is found, @@ -267,13 +293,13 @@ create_global_typedef_table (struct type_print_options *flags) type-printers, if any, given by start_script_type_printers and return the result. A NULL return means that the name was not found. */ -static const char * -find_global_typedef (const struct type_print_options *flags, - struct type *t) +const char * +typedef_hash_table::find_global_typedef (const struct type_print_options *flags, + struct type *t) { char *applied; void **slot; - struct typedef_field tf, *new_tf; + struct decl_field tf, *new_tf; if (flags->global_typedefs == NULL) return NULL; @@ -281,16 +307,16 @@ find_global_typedef (const struct type_print_options *flags, tf.name = NULL; tf.type = t; - slot = htab_find_slot (flags->global_typedefs->table, &tf, INSERT); + slot = htab_find_slot (flags->global_typedefs->m_table, &tf, INSERT); if (*slot != NULL) { - new_tf = *slot; + new_tf = (struct decl_field *) *slot; return new_tf->name; } - /* Put an entry into the hash table now, in case apply_script_type_printers - recurses. */ - new_tf = XOBNEW (&flags->global_typedefs->storage, struct typedef_field); + /* Put an entry into the hash table now, in case + apply_ext_lang_type_printers recurses. */ + new_tf = XOBNEW (&flags->global_typedefs->m_storage, struct decl_field); new_tf->name = NULL; new_tf->type = t; @@ -300,29 +326,28 @@ find_global_typedef (const struct type_print_options *flags, if (applied != NULL) { - new_tf->name = obstack_copy0 (&flags->global_typedefs->storage, applied, - strlen (applied)); + new_tf->name = obstack_strdup (&flags->global_typedefs->m_storage, + applied); xfree (applied); } return new_tf->name; } -/* Look up the type T in the typedef hash table in with FLAGS. If T - is in the table, return its short (class-relative) typedef name. - Otherwise return NULL. If the table is NULL, this always returns - NULL. */ +/* See typeprint.h. */ const char * -find_typedef_in_hash (const struct type_print_options *flags, struct type *t) +typedef_hash_table::find_typedef (const struct type_print_options *flags, + struct type *t) { if (flags->local_typedefs != NULL) { - struct typedef_field tf, *found; + struct decl_field tf, *found; tf.name = NULL; tf.type = t; - found = htab_find (flags->local_typedefs->table, &tf); + found = (struct decl_field *) htab_find (flags->local_typedefs->m_table, + &tf); if (found != NULL) return found->name; @@ -338,9 +363,9 @@ find_typedef_in_hash (const struct type_print_options *flags, struct type *t) NEW is the new name for a type TYPE. */ void -typedef_print (struct type *type, struct symbol *new, struct ui_file *stream) +typedef_print (struct type *type, struct symbol *newobj, struct ui_file *stream) { - LA_PRINT_TYPEDEF (type, new, stream); + LA_PRINT_TYPEDEF (type, newobj, stream); } /* The default way to print a typedef. */ @@ -369,49 +394,56 @@ type_print (struct type *type, const char *varstring, struct ui_file *stream, /* Print TYPE to a string, returning it. The caller is responsible for freeing the string. */ -char * +std::string type_to_string (struct type *type) { - char *s = NULL; - struct ui_file *stb; - struct cleanup *old_chain; - volatile struct gdb_exception except; - - stb = mem_fileopen (); - old_chain = make_cleanup_ui_file_delete (stb); + try + { + string_file stb; - TRY_CATCH (except, RETURN_MASK_ALL) + type_print (type, "", &stb, -1); + return std::move (stb.string ()); + } + catch (const gdb_exception &except) { - type_print (type, "", stb, -1); - s = ui_file_xstrdup (stb, NULL); } - if (except.reason < 0) - s = NULL; - do_cleanups (old_chain); + return {}; +} + +/* See typeprint.h. */ - return s; +void +type_print_unknown_return_type (struct ui_file *stream) +{ + fprintf_styled (stream, metadata_style.style (), + _("")); +} + +/* See typeprint.h. */ + +void +error_unknown_type (const char *sym_print_name) +{ + error (_("'%s' has unknown type; cast it to its declared type"), + sym_print_name); } /* Print type of EXP, or last thing in value history if EXP == NULL. show is passed to type_print. */ static void -whatis_exp (char *exp, int show) +whatis_exp (const char *exp, int show) { - struct expression *expr; struct value *val; - struct cleanup *old_chain; struct type *real_type = NULL; struct type *type; int full = 0; - int top = -1; + LONGEST top = -1; int using_enc = 0; struct value_print_options opts; struct type_print_options flags = default_ptype_flags; - old_chain = make_cleanup (null_cleanup, NULL); - if (exp) { if (*exp == '/') @@ -437,6 +469,21 @@ whatis_exp (char *exp, int show) case 'T': flags.print_typedefs = 1; break; + case 'o': + { + /* Filter out languages which don't implement the + feature. */ + if (show > 0 + && (current_language->la_language == language_c + || current_language->la_language == language_cplus + || current_language->la_language == language_rust)) + { + flags.print_offsets = 1; + flags.print_typedefs = 0; + flags.print_methods = 0; + } + break; + } default: error (_("unrecognized flag '%c'"), *exp); } @@ -450,30 +497,73 @@ whatis_exp (char *exp, int show) exp = skip_spaces (exp); } - expr = parse_expression (exp); - make_cleanup (free_current_contents, &expr); - val = evaluate_type (expr); + expression_up expr = parse_expression (exp); + + /* The behavior of "whatis" depends on whether the user + expression names a type directly, or a language expression + (including variable names). If the former, then "whatis" + strips one level of typedefs, only. If an expression, + "whatis" prints the type of the expression without stripping + any typedef level. "ptype" always strips all levels of + typedefs. */ + if (show == -1 && expr->elts[0].opcode == OP_TYPE) + { + /* The user expression names a type directly. */ + type = expr->elts[1].type; + + /* If this is a typedef, then find its immediate target. + Use check_typedef to resolve stubs, but ignore its result + because we do not want to dig past all typedefs. */ + check_typedef (type); + if (TYPE_CODE (type) == TYPE_CODE_TYPEDEF) + type = TYPE_TARGET_TYPE (type); + + /* If the expression is actually a type, then there's no + value to fetch the dynamic type from. */ + val = NULL; + } + else + { + /* The user expression names a type indirectly by naming an + object or expression of that type. Find that + indirectly-named type. */ + val = evaluate_type (expr.get ()); + type = value_type (val); + } } else - val = access_value_history (0); - - type = value_type (val); + { + val = access_value_history (0); + type = value_type (val); + } get_user_print_options (&opts); - if (opts.objectprint) + if (val != NULL && opts.objectprint) { - if (((TYPE_CODE (type) == TYPE_CODE_PTR) - || (TYPE_CODE (type) == TYPE_CODE_REF)) - && (TYPE_CODE (TYPE_TARGET_TYPE (type)) == TYPE_CODE_CLASS)) + if (((TYPE_CODE (type) == TYPE_CODE_PTR) || TYPE_IS_REFERENCE (type)) + && (TYPE_CODE (TYPE_TARGET_TYPE (type)) == TYPE_CODE_STRUCT)) real_type = value_rtti_indirect_type (val, &full, &top, &using_enc); - else if (TYPE_CODE (type) == TYPE_CODE_CLASS) + else if (TYPE_CODE (type) == TYPE_CODE_STRUCT) real_type = value_rtti_type (val, &full, &top, &using_enc); } + if (flags.print_offsets + && (TYPE_CODE (type) == TYPE_CODE_STRUCT + || TYPE_CODE (type) == TYPE_CODE_UNION)) + fprintf_filtered (gdb_stdout, "/* offset | size */ "); + printf_filtered ("type = "); + std::unique_ptr table_holder; + std::unique_ptr printer_holder; if (!flags.raw) - create_global_typedef_table (&flags); + { + table_holder.reset (new typedef_hash_table); + flags.global_typedefs = table_holder.get (); + + printer_holder.reset (new ext_lang_type_printers); + flags.global_printers = printer_holder.get (); + } if (real_type) { @@ -486,12 +576,10 @@ whatis_exp (char *exp, int show) LA_PRINT_TYPE (type, "", gdb_stdout, show, 0, &flags); printf_filtered ("\n"); - - do_cleanups (old_chain); } static void -whatis_command (char *exp, int from_tty) +whatis_command (const char *exp, int from_tty) { /* Most of the time users do not want to see all the fields in a structure. If they do they can use the "ptype" command. @@ -502,9 +590,9 @@ whatis_command (char *exp, int from_tty) /* TYPENAME is either the name of a type, or an expression. */ static void -ptype_command (char *typename, int from_tty) +ptype_command (const char *type_name, int from_tty) { - whatis_exp (typename, 1); + whatis_exp (type_name, 1); } /* Print integral scalar data VAL, of type TYPE, onto stdio stream STREAM. @@ -525,7 +613,7 @@ print_type_scalar (struct type *type, LONGEST val, struct ui_file *stream) unsigned int i; unsigned len; - CHECK_TYPEDEF (type); + type = check_typedef (type); switch (TYPE_CODE (type)) { @@ -580,6 +668,7 @@ print_type_scalar (struct type *type, LONGEST val, struct ui_file *stream) case TYPE_CODE_METHODPTR: case TYPE_CODE_METHOD: case TYPE_CODE_REF: + case TYPE_CODE_RVALUE_REF: case TYPE_CODE_NAMESPACE: error (_("internal error: unhandled type in print_type_scalar")); break; @@ -587,7 +676,6 @@ print_type_scalar (struct type *type, LONGEST val, struct ui_file *stream) default: error (_("Invalid type code in symbol table.")); } - gdb_flush (stream); } /* Dump details of a type specified either directly or indirectly. @@ -595,17 +683,14 @@ print_type_scalar (struct type *type, LONGEST val, struct ui_file *stream) and whatis_command(). */ void -maintenance_print_type (char *typename, int from_tty) +maintenance_print_type (const char *type_name, int from_tty) { struct value *val; struct type *type; - struct cleanup *old_chain; - struct expression *expr; - if (typename != NULL) + if (type_name != NULL) { - expr = parse_expression (typename); - old_chain = make_cleanup (free_current_contents, &expr); + expression_up expr = parse_expression (type_name); if (expr->elts[0].opcode == OP_TYPE) { /* The user expression names a type directly, just use that type. */ @@ -615,14 +700,13 @@ maintenance_print_type (char *typename, int from_tty) { /* The user expression may name a type indirectly by naming an object of that type. Find that indirectly named type. */ - val = evaluate_type (expr); + val = evaluate_type (expr.get ()); type = value_type (val); } if (type != NULL) { recursive_dump_type (type, 0); } - do_cleanups (old_chain); } } @@ -632,7 +716,7 @@ struct cmd_list_element *setprinttypelist; struct cmd_list_element *showprinttypelist; static void -set_print_type (char *arg, int from_tty) +set_print_type (const char *arg, int from_tty) { printf_unfiltered ( "\"set print type\" must be followed by the name of a subcommand.\n"); @@ -640,15 +724,16 @@ set_print_type (char *arg, int from_tty) } static void -show_print_type (char *args, int from_tty) +show_print_type (const char *args, int from_tty) { cmd_show_list (showprinttypelist, from_tty, ""); } -static int print_methods = 1; +static bool print_methods = true; static void -set_print_type_methods (char *args, int from_tty, struct cmd_list_element *c) +set_print_type_methods (const char *args, + int from_tty, struct cmd_list_element *c) { default_ptype_flags.print_methods = print_methods; } @@ -661,10 +746,11 @@ show_print_type_methods (struct ui_file *file, int from_tty, value); } -static int print_typedefs = 1; +static bool print_typedefs = true; static void -set_print_type_typedefs (char *args, int from_tty, struct cmd_list_element *c) +set_print_type_typedefs (const char *args, + int from_tty, struct cmd_list_element *c) { default_ptype_flags.print_typedefs = print_typedefs; } @@ -677,6 +763,41 @@ show_print_type_typedefs (struct ui_file *file, int from_tty, value); } +/* Limit on the number of nested type definitions to print or -1 to print + all nested type definitions in a class. By default, we do not print + nested definitions. */ + +static int print_nested_type_limit = 0; + +/* Set how many nested type definitions should be printed by the type + printer. */ + +static void +set_print_type_nested_types (const char *args, int from_tty, + struct cmd_list_element *c) +{ + default_ptype_flags.print_nested_type_limit = print_nested_type_limit; +} + +/* Show how many nested type definitions the type printer will print. */ + +static void +show_print_type_nested_types (struct ui_file *file, int from_tty, + struct cmd_list_element *c, const char *value) +{ + if (*value == '0') + { + fprintf_filtered (file, + _("Will not print nested types defined in a class\n")); + } + else + { + fprintf_filtered (file, + _("Will print %s nested types defined in a class\n"), + value); + } +} + void _initialize_typeprint (void) { @@ -696,7 +817,8 @@ Available FLAGS are:\n\ /m do not print methods defined in a class\n\ /M print methods defined in a class\n\ /t do not print typedefs defined in a class\n\ - /T print typedefs defined in a class")); + /T print typedefs defined in a class\n\ + /o print offsets and sizes of fields in a struct (like pahole)")); set_cmd_completer (c, expression_completer); c = add_com ("whatis", class_vars, whatis_command, @@ -709,7 +831,7 @@ Only one level of typedefs is unrolled. See also \"ptype\".")); &showprinttypelist, "show print type ", 0, &showprintlist); add_prefix_cmd ("type", no_class, set_print_type, _("Generic command for setting how types print."), - &setprinttypelist, "show print type ", 0, &setprintlist); + &setprinttypelist, "set print type ", 0, &setprintlist); add_setshow_boolean_cmd ("methods", no_class, &print_methods, _("\ @@ -725,4 +847,30 @@ Show printing of typedefs defined in classes."), NULL, set_print_type_typedefs, show_print_type_typedefs, &setprinttypelist, &showprinttypelist); + + add_setshow_zuinteger_unlimited_cmd ("nested-type-limit", no_class, + &print_nested_type_limit, + _("\ +Set the number of recursive nested type definitions to print \ +(\"unlimited\" or -1 to show all)."), _("\ +Show the number of recursive nested type definitions to print."), NULL, + set_print_type_nested_types, + show_print_type_nested_types, + &setprinttypelist, &showprinttypelist); +} + +/* Print status to stream STREAM. */ + +void +val_print_not_allocated (struct ui_file *stream) +{ + fprintf_styled (stream, metadata_style.style (), _("")); +} + +/* Print status to stream STREAM. */ + +void +val_print_not_associated (struct ui_file *stream) +{ + fprintf_styled (stream, metadata_style.style (), _("")); }