espressif/binutils-gdb
1
0
Fork 0
mirror of https://github.com/espressif/binutils-gdb.git synced 2025-05-29 07:10:55 +08:00
Code Issues Packages Projects Releases Wiki Activity

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

Browse Source 
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
Download Patch File Download Diff File Expand all files Collapse all files

5
gdb/testsuite/ChangeLog
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> 2013-10-06 Sergio Durigan Junior <sergiodj@redhat.com>
* gdb.base/corefile.exp: Test whether $_exitsignal is set and * gdb.base/corefile.exp: Test whether $_exitsignal is set and

3
gdb/testsuite/lib/mi-support.exp
View File

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