mirror/binutils-gdb
2
0
Fork 0
mirror of https://sourceware.org/git/binutils-gdb.git synced 2024-11-21 01:12:32 +08:00
Code Issues Packages Projects Releases Wiki Activity

2012-02-02 Pedro Alves <palves@redhat.com>

Browse Source 
* gdb.gdb/complaints.exp: Skip if gdb,noinferiorio is set.
	* gdb.gdb/selftest.exp (test_with_self): Handle gdb,noinferiorio.
This commit is contained in:
Pedro Alves 2012-02-02 18:09:07 +00:00
parent 5f8cefd757
commit c0b9f2c6e8
3 changed files with 31 additions and 11 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 @@
2012-02-02 Pedro Alves <palves@redhat.com>
* gdb.gdb/complaints.exp: Skip if gdb,noinferiorio is set.
* gdb.gdb/selftest.exp (test_with_self): Handle gdb,noinferiorio.
2012-02-02 Pedro Alves <palves@redhat.com>
* gdb.base/term.exp: Rewrite.

5
gdb/testsuite/gdb.gdb/complaints.exp
View File

@ -23,6 +23,11 @@ if { [is_remote target] || ![isnative] } then {
return
}
if [target_info exists gdb,noinferiorio] {
verbose "Skipping because of no inferiorio capabilities."
return
}
proc setup_test { executable } {
global gdb_prompt
global timeout

32
gdb/testsuite/gdb.gdb/selftest.exp
View File

@ -394,19 +394,29 @@ proc test_with_self { executable } {
}
# start the "xgdb" process
gdb_test_multiple "continue" "xgdb is at prompt" {
-re "GNU gdb \[0-9\.\]*.*Copyright \\(C\\) \[0-9\]* Free Software Foundation, Inc.*License GPLv3\\+: GNU GPL version 3 or later <http://gnu.org/licenses/gpl.html>.*This is free software: you are free to change and redistribute it.*There is NO WARRANTY, to the extent permitted by law. Type \"show copying\".*and \"show warranty\" for details.*This GDB was configured as .*$gdb_prompt $" {
pass "xgdb is at prompt"
if [target_info exists gdb,noinferiorio] {
# Maybe testing with a local extended-remote gdbserver. With
# no way to interact with inferior GDB, all we can do is let
# it run.
send_gdb "continue\n"
# Wait a bit while the inferior gdb gets to its prompt.
sleep 1
} else {
set test "xgdb is at prompt"
gdb_test_multiple "continue" $test {
-re "GNU gdb \[0-9\.\]*.*Copyright \\(C\\) \[0-9\]* Free Software Foundation, Inc.*License GPLv3\\+: GNU GPL version 3 or later <http://gnu.org/licenses/gpl.html>.*This is free software: you are free to change and redistribute it.*There is NO WARRANTY, to the extent permitted by law. Type \"show copying\".*and \"show warranty\" for details.*This GDB was configured as .*$gdb_prompt $" {
pass $test
}
}
# set xgdb prompt so we can tell which is which
gdb_test_multiple "set prompt (xgdb) " "Set xgdb_prompt" {
-re "\[(\]xgdb\[)\].*\[(\]xgdb\[)\] $" {
pass "Set xgdb prompt"
}
}
}
# set xgdb prompt so we can tell which is which
gdb_test_multiple "set prompt (xgdb) " "Set xgdb_prompt" {
-re "\[(\]xgdb\[)\].*\[(\]xgdb\[)\] $" {
pass "Set xgdb prompt"
}
}
# kill the xgdb process
set description "send ^C to child process"
send_gdb "\003"