mirror of
https://github.com/espressif/binutils-gdb.git
synced 2025-08-02 19:46:09 +08:00
* gdb.base/interrupt.exp: Add i*86-*-linux* setup_xfail for
"p func1 ()" and note that rests of tests are skipped. * gdb.base/corefile.exp: Add i*86-*-linux* and m68*-*-hpux* setup_xfails for "print func2::coremaker_local". Add i*86-*-linux* setup_xfail for "backtrace in corefile.exp". * gdb.base/mips_pro.exp: Restart gdb in this test so it isn't affected by the previous run test. * gdb.chill/misc.exp: Add m68*-*-hpux* setup_xfails for "print array () ubyte (foo)" and "print/x array () byte (\$i)" * gdb.chill/pr-8742.exp: Add m68*-*-hpux* setup_xfails for "pass int powerset tuple" and "pass modeless int powerset tuple". * gdb.chill/tests2.exp: Add m68*-*-hpux* setup xfails for "real write 4" and "real write 8". * gdb.shill/tuples.exp: Add i*86-*-linux* and m68*-*-hpux* setup_xfails for "print vs1 after tuple assign 2", "print \$i after tuple assign 2", and "print vs2 after tuple assign 2". * lib/gdb.exp (gdb_test): When a gdb aborts, print a more meaningful error message and return -1 so the caller can suppress further tests and avoid a cascade of errors.
This commit is contained in:
@ -275,8 +275,7 @@ proc runto_main {} {
|
||||
global usestubs
|
||||
|
||||
if $usestubs==0 {
|
||||
runto main
|
||||
return 1
|
||||
return [runto main]
|
||||
}
|
||||
|
||||
send "delete\n"
|
||||
@ -320,6 +319,7 @@ proc gdb_test { args } {
|
||||
global prompt
|
||||
global GDB
|
||||
global spawn_id
|
||||
global expect_out
|
||||
upvar timeout timeout
|
||||
|
||||
if [llength $args]==3 then {
|
||||
@ -364,6 +364,24 @@ proc gdb_test { args } {
|
||||
perror "\"$command\" is not a unique command name."
|
||||
set result 1
|
||||
}
|
||||
-re "(.*)(Program exited with code \[0-9\]+)(.*$prompt $)" {
|
||||
if ![string match "" $message] then {
|
||||
set errmsg "$message: $expect_out(2,string)"
|
||||
} else {
|
||||
set errmsg "$command: $expect_out(2,string)"
|
||||
}
|
||||
perror "$errmsg"
|
||||
return -1
|
||||
}
|
||||
-re "The program is not being run.*$prompt $" {
|
||||
if ![string match "" $message] then {
|
||||
set errmsg "$message: the program is no longer running"
|
||||
} else {
|
||||
set errmsg "$command: the program is no longer running"
|
||||
}
|
||||
perror "$errmsg"
|
||||
return -1
|
||||
}
|
||||
-re ".*$prompt $" {
|
||||
if ![string match "" $message] then {
|
||||
fail "$message"
|
||||
@ -382,7 +400,7 @@ proc gdb_test { args } {
|
||||
perror "Process no longer exists"
|
||||
return -1
|
||||
}
|
||||
buffer_full {
|
||||
full_buffer {
|
||||
perror "internal buffer is full."
|
||||
}
|
||||
timeout {
|
||||
|
Reference in New Issue
Block a user