From 31b4ab9e37d4592c3faa883008d0fc06f8cfa6fc Mon Sep 17 00:00:00 2001 From: Yao Qi Date: Wed, 13 Nov 2013 21:01:47 +0800 Subject: [PATCH] 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 * lib/mi-support.exp (mi_child_regexp): Remove unnecessary '\'. --- gdb/testsuite/ChangeLog | 4 ++++ 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 3f08375848e..37bd536e5f1 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,7 @@ +2013-11-19 Yao Qi + + * lib/mi-support.exp (mi_child_regexp): Remove unnecessary '\'. + 2013-11-19 Yao Qi * lib/mi-support.exp: Fix format. diff --git a/gdb/testsuite/lib/mi-support.exp b/gdb/testsuite/lib/mi-support.exp index 4438da8fbca..7f34c9b06a9 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\]+\")?}" -- 2.30.2