aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorPedro Alves <palves@redhat.com>2009-11-21 05:17:41 +0000
committerPedro Alves <palves@redhat.com>2009-11-21 05:17:41 +0000
commit8c2fb5deb3f40d81b448d54d7eaa02cde2c6e014 (patch)
treead67d183ea45754faebdfda5dc2fe32c2c0e9a36
parentfdfc5546166e16fb05dff1c357ac89ed6d4c5b14 (diff)
downloadgdb-8c2fb5deb3f40d81b448d54d7eaa02cde2c6e014.zip
gdb-8c2fb5deb3f40d81b448d54d7eaa02cde2c6e014.tar.gz
gdb-8c2fb5deb3f40d81b448d54d7eaa02cde2c6e014.tar.bz2
* gdb.cp/cplusfuncs.exp (info_func_regexp, print_addr): Don't
assume new `regsub' syntax available.
-rw-r--r--gdb/testsuite/ChangeLog5
-rw-r--r--gdb/testsuite/gdb.cp/cplusfuncs.exp4
2 files changed, 7 insertions, 2 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index 6bdf95a..5caae10 100644
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+2009-11-21 Pedro Alves <pedro@codesourcery.com>
+
+ * gdb.cp/cplusfuncs.exp (info_func_regexp, print_addr): Don't
+ assume new `regsub' syntax available.
+
2009-11-20 Jan Kratochvil <jan.kratochvil@redhat.com>
* gdb.base/watchpoint-hw-hit-once.exp,
diff --git a/gdb/testsuite/gdb.cp/cplusfuncs.exp b/gdb/testsuite/gdb.cp/cplusfuncs.exp
index 607dceb..092c0ff 100644
--- a/gdb/testsuite/gdb.cp/cplusfuncs.exp
+++ b/gdb/testsuite/gdb.cp/cplusfuncs.exp
@@ -241,7 +241,7 @@ proc info_func_regexp { name demangled } {
global gdb_prompt
send_gdb "info function $name\n"
- set demangled [regsub {\\\(void\\\)} $demangled {\(\)}]
+ regsub {\\\(void\\\)} $demangled {\(\)} demangled
gdb_expect {
-re ".*File .*:\r\n(class |)$demangled\r\n.*$gdb_prompt $" {
pass "info function for \"$name\""
@@ -328,7 +328,7 @@ proc print_addr_2_kfail { name good bad bugid } {
#
proc print_addr { name } {
- set expected [regsub {\(void\)} $name {()}]
+ regsub {\(void\)} $name {()} expected
if {[string first "::" $name] == -1} {
# C function -- must be qutoed
set name "'$name'"