2000-12-21 Michael Snyder <msnyder@mvstp600e.cygnus.com>

* gdb.base/finish.exp: Accept '1' instead of \001 from char_func.
        Add a RE to accept a non-ascii char if one is ever presented.
This commit is contained in:
Michael Snyder 2000-12-22 01:49:46 +00:00
parent ef9dff19c4
commit 315f8b0e91
2 changed files with 14 additions and 2 deletions

View File

@ -1,3 +1,8 @@
2000-12-21 Michael Snyder <msnyder@mvstp600e.cygnus.com>
* gdb.base/finish.exp: Accept '1' instead of \001 from char_func.
Add a RE to accept a non-ascii char if one is ever presented.
2000-12-20 Fernando Nasser <fnasser@redhat.com>
* lib/mi-support.exp (mi_gdb_start): Test for MI_OUT, not UI_OUT.

View File

@ -43,11 +43,18 @@ proc finish_1 { type } {
"continue to ${type}_func"
send_gdb "finish\n"
gdb_expect {
-re ".*Value returned is .* = 1 '.001'\r\n$gdb_prompt $" {
-re ".*Value returned is .* = 49 '1'\r\n$gdb_prompt $" {
if { $type == "char" } {
pass "finish from char_func"
} else {
fail "finish from char_func"
fail "finish from ${type}_func"
}
}
-re ".*Value returned is .* = \[0123456789\]* '1'\r\n$gdb_prompt $" {
if { $type == "char" } {
pass "finish from char_func (non-ASCII char set?)"
} else {
fail "finish from ${type}_func"
}
}
-re ".*Value returned is .* = 1\r\n$gdb_prompt $" {