* lib/mi-support.exp (varobj_tree::walk_tree): Set _root_idx

to 0.
This commit is contained in:
Tom Tromey 2013-10-07 19:10:45 +00:00
parent 58b239d861
commit f44eeb117f
2 changed files with 8 additions and 0 deletions

View File

@ -1,3 +1,8 @@
2013-10-07 Tom Tromey <tromey@redhat.com>
* lib/mi-support.exp (varobj_tree::walk_tree): Set _root_idx
to 0.
2013-10-06 Sergio Durigan Junior <sergiodj@redhat.com>
* gdb.base/corefile.exp: Test whether $_exitsignal is set and

View File

@ -2259,11 +2259,14 @@ namespace eval ::varobj_tree {
# given varobj TREE. See detailed explanation above.
proc walk_tree {language tree callback} {
global root
variable _root_idx
if {[llength $tree] < 3} {
error "tree does not contain enough elements"
}
set _root_idx 0
# Create root node and process the tree.
array set root [list language $language]
array set root [list obj_name "root"]