Remove 'whatever' in lib/mi-support.exp
authorYao Qi <yao@codesourcery.com>
Wed, 13 Nov 2013 12:57:40 +0000 (20:57 +0800)
committerYao Qi <yao@codesourcery.com>
Tue, 19 Nov 2013 07:26:31 +0000 (15:26 +0800)
Variable 'whatever' is not used at all.  This patch is to remove it.

gdb/testsuite:

2013-11-19  Yao Qi  <yao@codesourcery.com>

* lib/mi-support.exp (mi_child_regexp): Remove 'whatever'.
(mi_list_varobj_children_range): Likewise.

gdb/ChangeLog
gdb/testsuite/lib/mi-support.exp

index e296241..3afa68e 100644 (file)
@@ -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>
index 881e16e..8eaa367 100644 (file)
@@ -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.*\\\]"