diff options
| -rw-r--r-- | gdb/ChangeLog | 5 | ||||
| -rw-r--r-- | gdb/testsuite/lib/mi-support.exp | 3 |
2 files changed, 5 insertions, 3 deletions
diff --git a/gdb/ChangeLog b/gdb/ChangeLog index e296241..3afa68e 100644 --- a/gdb/ChangeLog +++ b/gdb/ChangeLog @@ -1,5 +1,10 @@ 2013-11-19 Yao Qi <yao@codesourcery.com> + * lib/mi-support.exp (mi_child_regexp): Remove 'whatever'. + (mi_list_varobj_children_range): Likewise. + +2013-11-19 Yao Qi <yao@codesourcery.com> + * varobj.c (varobj_get_type): Fix typo. 2013-11-19 Joel Brobecker <brobecker@adacore.com> diff --git a/gdb/testsuite/lib/mi-support.exp b/gdb/testsuite/lib/mi-support.exp index 881e16e..8eaa367 100644 --- a/gdb/testsuite/lib/mi-support.exp +++ b/gdb/testsuite/lib/mi-support.exp @@ -1397,7 +1397,6 @@ proc mi_check_varobj_value { name value testname } { # mi_list_varobj_children and mi_varobj_update_dynamic. proc mi_child_regexp {children add_child} { set children_exp {} - set whatever "\"\[^\"\]+\"" if {$add_child} { set pre "child=" @@ -1463,8 +1462,6 @@ proc mi_list_varobj_children_range {varname from to numchildren children testnam set varname [lindex $varname 0] } - set whatever "\"\[^\"\]+\"" - set children_exp_j [mi_child_regexp $children 1] if {$numchildren} { set expected "\\^done,numchild=\".*\",children=\\\[$children_exp_j.*\\\]" |