OpenE2K
/
binutils-gdb
12
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

* gdb.base/charset.exp: Don't assume new `regsub' syntax 

available.
This commit is contained in:
Pedro Alves 2010-02-17 22:05:58 +00:00
parent 012836ea49
commit 12d79008ef
2 changed files with 7 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
gdb/testsuite/ChangeLog
View File

@ -1,3 +1,8 @@
2010-02-17 Pedro Alves <pedro@codesourcery.com>
* gdb.base/charset.exp: Don't assume new `regsub' syntax
available.
2010-02-16 Daniel Jacobowitz <dan@codesourcery.com>
* gdb.xml/tdesc-arch.exp, gdb.xml/tdesc-regs.exp: Rewrite file

4
gdb/testsuite/gdb.base/charset.exp
View File

@ -140,7 +140,7 @@ send_gdb "set host-charset\n"
gdb_expect {
-re "Requires an argument. Valid arguments are (.*)\\.\r\n$gdb_prompt $" {
set host_charset_list $expect_out(1,string)
set host_charset_list [regsub -all {, } $host_charset_list {,}]
regsub -all {, } $host_charset_list {,} host_charset_list
foreach host_charset [split $host_charset_list ","] {
set charsets($host_charset) 1
}
@ -168,7 +168,7 @@ send_gdb "set target-charset\n"
gdb_expect {
-re "Requires an argument. Valid arguments are (.*)\\.\r\n$gdb_prompt $" {
set target_charset_list $expect_out(1,string)
set target_charset_list [regsub -all {, } $target_charset_list {,}]
regsub -all {, } $target_charset_list {,} target_charset_list
foreach target_charset [split $target_charset_list ","] {
if {! [info exists charsets($target_charset)]} {
set charsets($target_charset) 0