diff options
Diffstat (limited to 'gdb/mi')
| -rw-r--r-- | gdb/mi/ChangeLog | 7 | ||||
| -rw-r--r-- | gdb/mi/gdbmi.texinfo | 4 | ||||
| -rw-r--r-- | gdb/mi/mi-cmd-var.c | 5 |
3 files changed, 13 insertions, 3 deletions
diff --git a/gdb/mi/ChangeLog b/gdb/mi/ChangeLog index 57b7fd8..e25430e 100644 --- a/gdb/mi/ChangeLog +++ b/gdb/mi/ChangeLog @@ -1,3 +1,10 @@ +2003-02-02 Andrew Cagney <ac131313@redhat.com> + + From 2002-11-10 Jason Molenda (jason-cl@molenda.com): + * mi-cmd-var.c (mi_cmd_var_list_children): CHILDREN field is + now a list; still a tuple when in mi1. + * gdbmi.texinfo: Update var-list-children example. + 2003-01-13 Andrew Cagney <ac131313@redhat.com> * mi-cmd-env.c: Update copyright. diff --git a/gdb/mi/gdbmi.texinfo b/gdb/mi/gdbmi.texinfo index 4cf34c2..8326bca 100644 --- a/gdb/mi/gdbmi.texinfo +++ b/gdb/mi/gdbmi.texinfo @@ -3756,8 +3756,8 @@ Returns the number of children of a variable object @var{name}: Returns a list of the children of the specified variable object: @example - numchild=@var{n},children=@{@{name=@var{name}, - numchild=@var{n},type=@var{type}@},@r{(repeats N times)}@} + numchild=@var{n},children=[@{name=@var{name}, + numchild=@var{n},type=@var{type}@},@r{(repeats N times)}] @end example diff --git a/gdb/mi/mi-cmd-var.c b/gdb/mi/mi-cmd-var.c index 990b278..0da6106 100644 --- a/gdb/mi/mi-cmd-var.c +++ b/gdb/mi/mi-cmd-var.c @@ -272,7 +272,10 @@ mi_cmd_var_list_children (char *command, char **argv, int argc) if (numchild <= 0) return MI_CMD_DONE; - cleanup_children = make_cleanup_ui_out_tuple_begin_end (uiout, "children"); + if (mi_version (uiout) == 1) + cleanup_children = make_cleanup_ui_out_tuple_begin_end (uiout, "children"); + else + cleanup_children = make_cleanup_ui_out_list_begin_end (uiout, "children"); cc = childlist; while (*cc != NULL) { |