diff options
author | Yao Qi <yao@codesourcery.com> | 2013-11-13 21:01:47 +0800 |
---|---|---|
committer | Yao Qi <yao@codesourcery.com> | 2013-11-19 21:36:15 +0800 |
commit | 31b4ab9e37d4592c3faa883008d0fc06f8cfa6fc (patch) | |
tree | 32bb7970b97f43dbfcc1a4ecbb5928225ca5b98e | |
parent | 4392c53486b779e2ed309a42f9ce030fa04014d9 (diff) | |
download | gdb-31b4ab9e37d4592c3faa883008d0fc06f8cfa6fc.zip gdb-31b4ab9e37d4592c3faa883008d0fc06f8cfa6fc.tar.gz gdb-31b4ab9e37d4592c3faa883008d0fc06f8cfa6fc.tar.bz2 |
Remove unnecessary '\'.
Hi,
In proc mi_child_regexp, \(,thread-id=\"\[0-9\]+\") is appended to
children_exp, while the first '\' is not necessary. This patch
is to remove it. With this patch applied, Emacs can find the right
left paren.
gdb/testsuite:
2013-11-19 Yao Qi <yao@codesourcery.com>
* lib/mi-support.exp (mi_child_regexp): Remove unnecessary '\'.
-rw-r--r-- | gdb/testsuite/ChangeLog | 4 | ||||
-rw-r--r-- | gdb/testsuite/lib/mi-support.exp | 4 |
2 files changed, 6 insertions, 2 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index 3f08375..37bd536 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,5 +1,9 @@ 2013-11-19 Yao Qi <yao@codesourcery.com> + * lib/mi-support.exp (mi_child_regexp): Remove unnecessary '\'. + +2013-11-19 Yao Qi <yao@codesourcery.com> + * lib/mi-support.exp: Fix format. 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 4438da8..7f34c9b 100644 --- a/gdb/testsuite/lib/mi-support.exp +++ b/gdb/testsuite/lib/mi-support.exp @@ -1414,12 +1414,12 @@ proc mi_child_regexp {children add_child} { set value [lindex $item 4] lappend children_exp\ - "$pre{name=\"$name\",exp=\"$exp\",numchild=\"$numchild\",value=\"$value\",type=\"$type\"\(,thread-id=\"\[0-9\]+\")?}" + "$pre{name=\"$name\",exp=\"$exp\",numchild=\"$numchild\",value=\"$value\",type=\"$type\"(,thread-id=\"\[0-9\]+\")?}" } elseif {[llength $item] == 4} { set type [lindex $item 3] lappend children_exp\ - "$pre{name=\"$name\",exp=\"$exp\",numchild=\"$numchild\",type=\"$type\"\(,thread-id=\"\[0-9\]+\")?}" + "$pre{name=\"$name\",exp=\"$exp\",numchild=\"$numchild\",type=\"$type\"(,thread-id=\"\[0-9\]+\")?}" } else { lappend children_exp\ "$pre{name=\"$name\",exp=\"$exp\",numchild=\"$numchild\"(,thread-id=\"\[0-9\]+\")?}" |