This is the mail archive of the gdb-patches@sources.redhat.com mailing list for the GDB project.
Index Nav: | [Date Index] [Subject Index] [Author Index] [Thread Index] | |
---|---|---|
Message Nav: | [Date Prev] [Date Next] | [Thread Prev] [Thread Next] |
Other format: | [Raw text] |
Attached is a patch for -stack-list-locals which roughly modifies this command as I described previously on gdb@sources.redhat.com (Thu, 6 Nov 2003 22:04:22 +0000). It actually does the following:
1) Display the name, type and value for simple data types. 2) Display the name and type for complex data types.
I don't really know what make_cleanup_ui_out_tuple_begin_end and do_cleanups do and I've approximated a simple data type to something that isn't TYPE_CODE_ARRAY or TYPE_CODE_STRUCT so it's probably a pretty gross hack.
The idea is that the user can see the value of simple data types immediately and can create variable objects for complex data types if he wishes to explore their values in more detail.
Any comments?
For the cleanups try the restructured form: { struct cleanup = cleanups = make_cleanup (NULL, null_cleanup); .. do_cleanups (cleanups); } http://sources.redhat.com/gdb/current/onlinedocs/gdbint_13.html#SEC112
Nick http://www.nick.uklinux.net
*** mi-cmd-stack.c.~1.19.~ 2003-06-12 23:29:37.000000000 +0100
--- mi-cmd-stack.c 2003-11-22 23:49:24.000000000 +0000
***************
*** 273,292 ****
make_cleanup_ui_out_tuple_begin_end (uiout, NULL);
ui_out_field_string (uiout, "name", DEPRECATED_SYMBOL_NAME (sym));
! if (values)
! {
! struct symbol *sym2;
! if (!locals)
! sym2 = lookup_symbol (DEPRECATED_SYMBOL_NAME (sym),
! block, VAR_DOMAIN,
! (int *) NULL,
! 2 (struct symtab **) NULL);
! else
sym2 = sym;
print_variable_value (sym2, fi, stb->stream);
ui_out_field_stream (uiout, "value", stb);
- do_cleanups (cleanup_tuple);
}
}
}
if (BLOCK_FUNCTION (block))
--- 273,303 ----
make_cleanup_ui_out_tuple_begin_end (uiout, NULL);
ui_out_field_string (uiout, "name", DEPRECATED_SYMBOL_NAME (sym));
! struct symbol *sym2;
! if (!locals)
! sym2 = lookup_symbol (DEPRECATED_SYMBOL_NAME (sym),
! block, VAR_DOMAIN,
! (int *) NULL,
! (struct symtab **) NULL);
! else
sym2 = sym;
+ if (values == 2)
+ {
+ type_print (sym2->type, "", stb->stream, -1);
+ ui_out_field_stream (uiout, "type", stb);
+ if (TYPE_CODE (sym2->type) != TYPE_CODE_ARRAY &&
+ TYPE_CODE (sym2->type) != TYPE_CODE_STRUCT)
+ {
+ print_variable_value (sym2, fi, stb->stream);
+ ui_out_field_stream (uiout, "value", stb);
+ }
+ }
+ else if (values)
+ {
print_variable_value (sym2, fi, stb->stream);
ui_out_field_stream (uiout, "value", stb);
}
+ if (values) do_cleanups (cleanup_tuple);
}
}
if (BLOCK_FUNCTION (block))
Index Nav: | [Date Index] [Subject Index] [Author Index] [Thread Index] | |
---|---|---|
Message Nav: | [Date Prev] [Date Next] | [Thread Prev] [Thread Next] |