aboutsummaryrefslogtreecommitdiff
path: root/gdb/testsuite
diff options
context:
space:
mode:
authorYao Qi <yao.qi@linaro.org>2015-06-17 17:03:03 +0100
committerYao Qi <yao.qi@linaro.org>2015-06-17 17:16:00 +0100
commit920467912a594a3e5af1d779487ffe3e5c550aef (patch)
tree5ac4566db581fc90ada80121ab2277829789f8a0 /gdb/testsuite
parent696ddf4b52bd4b4d3997ca1a514b1d07fcea3715 (diff)
downloadgdb-920467912a594a3e5af1d779487ffe3e5c550aef.zip
gdb-920467912a594a3e5af1d779487ffe3e5c550aef.tar.gz
gdb-920467912a594a3e5af1d779487ffe3e5c550aef.tar.bz2
Fix tcl error
This patch fixes the following tcl error Running ../../../binutils-gdb/gdb/testsuite/gdb.base/break-interp.exp ... ERROR: (DejaGnu) proc "else" does not exist. The error code is NONE The info on the error is: invalid command name "else" while executing "::tcl_unknown else" ("uplevel" body line 1) invoked from within "uplevel 1 ::tcl_unknown $args" gdb/testsuite: 2015-06-17 Yao Qi <yao.qi@linaro.org> * lib/gdb.exp (get_build_id): Move braces and "else" to the same line.
Diffstat (limited to 'gdb/testsuite')
-rw-r--r--gdb/testsuite/ChangeLog5
-rw-r--r--gdb/testsuite/lib/gdb.exp4
2 files changed, 6 insertions, 3 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index e526cb3..65c5579 100644
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+2015-06-17 Yao Qi <yao.qi@linaro.org>
+
+ * lib/gdb.exp (get_build_id): Move braces and "else" to the same
+ line.
+
2015-06-17 Patrick Palka <patrick@parcs.ath.cx>
* gdb.base/gdbinit-history.exp: Add test case to check that
diff --git a/gdb/testsuite/lib/gdb.exp b/gdb/testsuite/lib/gdb.exp
index 21a4638..b5928c3 100644
--- a/gdb/testsuite/lib/gdb.exp
+++ b/gdb/testsuite/lib/gdb.exp
@@ -4549,9 +4549,7 @@ proc get_build_id { filename } {
return ""
}
return $data
- }
- else
- {
+ } else {
set tmp [standard_output_file "${filename}-tmp"]
set objcopy_program [gdb_find_objcopy]
set result [catch "exec $objcopy_program -j .note.gnu.build-id -O binary $filename $tmp" output]