diff options
author | Jan Kratochvil <jan.kratochvil@redhat.com> | 2011-10-28 17:32:30 +0000 |
---|---|---|
committer | Jan Kratochvil <jan.kratochvil@redhat.com> | 2011-10-28 17:32:30 +0000 |
commit | 3a3dad982f5399fb86a5ea5a7fb1ba203c3c03e0 (patch) | |
tree | 4a1d167aa6f85cd0aab1b847326a85fda377c225 /gdb | |
parent | 821296b70dcf3e91ce92fb78b9360e3ff06d0494 (diff) | |
download | gdb-3a3dad982f5399fb86a5ea5a7fb1ba203c3c03e0.zip gdb-3a3dad982f5399fb86a5ea5a7fb1ba203c3c03e0.tar.gz gdb-3a3dad982f5399fb86a5ea5a7fb1ba203c3c03e0.tar.bz2 |
gdb/testsuite/
* gdb.base/async-shell.exp: Skip the testfile for use_gdb_stub.
* gdb.base/attach-pie-misread.exp: Likewise.
* gdb.base/break-interp.exp: Likewise.
* gdb.base/default.exp (attach, run "r" abbreviation, run): Skip these
testcases for use_gdb_stub.
* gdb.dwarf2/dw2-restore.exp: Fix the run for use_gdb_stub.
(continue): New testcase.
* gdb.python/py-events.exp: Skip the testfile for use_gdb_stub.
* gdb.threads/attach-into-signal.exp: Likewise.
* gdb.threads/attach-stopped.exp: Likewise.
* gdb.threads/attachstop-mt.exp: Likewise.
Diffstat (limited to 'gdb')
-rw-r--r-- | gdb/testsuite/ChangeLog | 16 | ||||
-rw-r--r-- | gdb/testsuite/gdb.base/async-shell.exp | 5 | ||||
-rw-r--r-- | gdb/testsuite/gdb.base/attach-pie-misread.exp | 3 | ||||
-rw-r--r-- | gdb/testsuite/gdb.base/break-interp.exp | 3 | ||||
-rw-r--r-- | gdb/testsuite/gdb.base/default.exp | 38 | ||||
-rw-r--r-- | gdb/testsuite/gdb.dwarf2/dw2-restore.exp | 7 | ||||
-rw-r--r-- | gdb/testsuite/gdb.python/py-events.exp | 4 | ||||
-rw-r--r-- | gdb/testsuite/gdb.threads/attach-into-signal.exp | 3 | ||||
-rw-r--r-- | gdb/testsuite/gdb.threads/attach-stopped.exp | 3 | ||||
-rw-r--r-- | gdb/testsuite/gdb.threads/attachstop-mt.exp | 3 |
10 files changed, 59 insertions, 26 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index 82c1a59..f26044b 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,15 +1,27 @@ +2011-10-28 Jan Kratochvil <jan.kratochvil@redhat.com> + + * gdb.base/async-shell.exp: Skip the testfile for use_gdb_stub. + * gdb.base/attach-pie-misread.exp: Likewise. + * gdb.base/break-interp.exp: Likewise. + * gdb.base/default.exp (attach, run "r" abbreviation, run): Skip these + testcases for use_gdb_stub. + * gdb.dwarf2/dw2-restore.exp: Fix the run for use_gdb_stub. + (continue): New testcase. + * gdb.python/py-events.exp: Skip the testfile for use_gdb_stub. + * gdb.threads/attach-into-signal.exp: Likewise. + * gdb.threads/attach-stopped.exp: Likewise. + * gdb.threads/attachstop-mt.exp: Likewise. + 2011-10-28 Paul Koning <paul_koning@dell.com> * gdb.python/lib-types.exp (deep_items): Rename from deepitems. - 2011-10-27 Jan Kratochvil <jan.kratochvil@redhat.com> * lib/mi-support.exp (breakpoint_re): Suppress match reporting. (mi_gdb_test): Import globals thread_selected_re and breakpoint_re. Expect them optionally at the regex start. - 2011-10-27 Doug Evans <dje@google.com> * gdb.python/python.exp: Test source -s. diff --git a/gdb/testsuite/gdb.base/async-shell.exp b/gdb/testsuite/gdb.base/async-shell.exp index a1eb314..27bab64 100644 --- a/gdb/testsuite/gdb.base/async-shell.exp +++ b/gdb/testsuite/gdb.base/async-shell.exp @@ -20,6 +20,11 @@ if { ![support_displaced_stepping] } { return -1 } +# The testfile uses "run". The real bug happened only for ![is_remote target]. +if [target_info exists use_gdb_stub] { + return 0 +} + if { [prepare_for_testing ${testfile}.exp ${testfile}] } { return -1 } diff --git a/gdb/testsuite/gdb.base/attach-pie-misread.exp b/gdb/testsuite/gdb.base/attach-pie-misread.exp index d97ed8f..6a11fc5 100644 --- a/gdb/testsuite/gdb.base/attach-pie-misread.exp +++ b/gdb/testsuite/gdb.base/attach-pie-misread.exp @@ -14,7 +14,8 @@ # along with this program. If not, see <http://www.gnu.org/licenses/>. # This test only works on GNU/Linux. -if { ![isnative] || [is_remote host] || ![istarget *-linux*] || [skip_shlib_tests]} { +if { ![isnative] || [is_remote host] || [target_info exists use_gdb_stub] + || ![istarget *-linux*] || [skip_shlib_tests]} { continue } diff --git a/gdb/testsuite/gdb.base/break-interp.exp b/gdb/testsuite/gdb.base/break-interp.exp index 47a6f8c..d60bc71 100644 --- a/gdb/testsuite/gdb.base/break-interp.exp +++ b/gdb/testsuite/gdb.base/break-interp.exp @@ -14,7 +14,8 @@ # along with this program. If not, see <http://www.gnu.org/licenses/>. # This test only works on GNU/Linux. -if { ![isnative] || [is_remote host] || ![istarget *-linux*] || [skip_shlib_tests]} { +if { ![isnative] || [is_remote host] || [target_info exists use_gdb_stub] + || ![istarget *-linux*] || [skip_shlib_tests]} { continue } diff --git a/gdb/testsuite/gdb.base/default.exp b/gdb/testsuite/gdb.base/default.exp index 44dd711..4b7a8f5 100644 --- a/gdb/testsuite/gdb.base/default.exp +++ b/gdb/testsuite/gdb.base/default.exp @@ -39,23 +39,23 @@ gdb_test "append value" "Missing filename\." gdb_test "append binary memory" "Missing filename\." gdb_test "append binary value" "Missing filename\." -setup_xfail "mips-idt-*" -gdb_test_multiple "attach" "attach" { - -re "Argument required .(process-id|program) to attach.*$gdb_prompt $"\ - { pass "attach" } - -re "You can't do that when your target is `None'.*$gdb_prompt $"\ - { pass "attach" } - -re "You can't do that without a process to debug.*$gdb_prompt $"\ - { pass "attach" } - -re "Don't know how to attach. Try \"help target\"..*$gdb_prompt $"\ - { pass "attach" } - -re "Kill it. .y or n." { - send_gdb "y\n" - exp_continue +if ![target_info exists use_gdb_stub] { + setup_xfail "mips-idt-*" + gdb_test_multiple "attach" "attach" { + -re "Argument required .(process-id|program) to attach.*$gdb_prompt $"\ + { pass "attach" } + -re "You can't do that when your target is `None'.*$gdb_prompt $"\ + { pass "attach" } + -re "You can't do that without a process to debug.*$gdb_prompt $"\ + { pass "attach" } + -re "Don't know how to attach. Try \"help target\"..*$gdb_prompt $"\ + { pass "attach" } + -re "Kill it. .y or n." { + send_gdb "y\n" + exp_continue + } } -} -if ![target_info exists use_gdb_stub] { gdb_test "break" "No default breakpoint address now." "break" foreach i "b br bre brea" { gdb_test $i "No default breakpoint address now." "break \"$i\" abbreviation" @@ -420,7 +420,9 @@ gdb_test "ptype" "The history is empty." "ptype" gdb_test "pwd" "Working directory .*" "pwd" #test run "r" abbreviation -if [istarget "*-*-vxworks*"] then { +if [target_info exists use_gdb_stub] { + # Only extended-remote supports "run". +} elseif [istarget "*-*-vxworks*"] then { gdb_test "set args" ".*" "" gdb_test "r" "Starting program: .* @@ -446,7 +448,9 @@ You must specify a function name to run, and arguments if any"\ } #test run -if [istarget "*-*-vxworks*"] then { +if [target_info exists use_gdb_stub] { + # Only extended-remote supports "run". +} elseif [istarget "*-*-vxworks*"] then { gdb_test "set args" ".*" "" gdb_test "run" "Starting program: .* diff --git a/gdb/testsuite/gdb.dwarf2/dw2-restore.exp b/gdb/testsuite/gdb.dwarf2/dw2-restore.exp index e64c5e5..50225b8 100644 --- a/gdb/testsuite/gdb.dwarf2/dw2-restore.exp +++ b/gdb/testsuite/gdb.dwarf2/dw2-restore.exp @@ -33,5 +33,8 @@ gdb_start gdb_reinitialize_dir $srcdir/$subdir gdb_load ${binfile} -gdb_test "run" ".*" -gdb_test "where" ".*$hex in foo ().+$hex in _start ().*" +if ![runto foo] { + return 0 +} +gdb_test "continue" "$hex in foo \\(\\)" +gdb_test "where" "#0 +$hex in foo \\(\\)\r\n#1 +$hex in _start \\(\\)" diff --git a/gdb/testsuite/gdb.python/py-events.exp b/gdb/testsuite/gdb.python/py-events.exp index e420389..02f4bc9 100644 --- a/gdb/testsuite/gdb.python/py-events.exp +++ b/gdb/testsuite/gdb.python/py-events.exp @@ -13,6 +13,10 @@ # You should have received a copy of the GNU General Public License # along with this program. If not, see <http://www.gnu.org/licenses/>. +if [target_info exists use_gdb_stub] { + return 0 +} + if $tracelevel then { strace $tracelevel } diff --git a/gdb/testsuite/gdb.threads/attach-into-signal.exp b/gdb/testsuite/gdb.threads/attach-into-signal.exp index 4adf2b7..a5ea36e 100644 --- a/gdb/testsuite/gdb.threads/attach-into-signal.exp +++ b/gdb/testsuite/gdb.threads/attach-into-signal.exp @@ -17,7 +17,8 @@ # This file was created by Jan Kratochvil <jan.kratochvil@redhat.com>. # This test only works on Linux -if { ![isnative] || [is_remote host] || ![istarget *-linux*] } { +if { ![isnative] || [is_remote host] || [target_info exists use_gdb_stub] + || ![istarget *-linux*] } { continue } diff --git a/gdb/testsuite/gdb.threads/attach-stopped.exp b/gdb/testsuite/gdb.threads/attach-stopped.exp index 08a9437..3fabb03 100644 --- a/gdb/testsuite/gdb.threads/attach-stopped.exp +++ b/gdb/testsuite/gdb.threads/attach-stopped.exp @@ -18,7 +18,8 @@ # This file was updated by Jan Kratochvil <jan.kratochvil@redhat.com>. # This test only works on Linux -if { ![isnative] || [is_remote host] || ![istarget *-linux*] } { +if { ![isnative] || [is_remote host] || [target_info exists use_gdb_stub] + || ![istarget *-linux*] } { continue } diff --git a/gdb/testsuite/gdb.threads/attachstop-mt.exp b/gdb/testsuite/gdb.threads/attachstop-mt.exp index 12bf960..c939f35 100644 --- a/gdb/testsuite/gdb.threads/attachstop-mt.exp +++ b/gdb/testsuite/gdb.threads/attachstop-mt.exp @@ -17,7 +17,8 @@ # <jjohnstn@redhat.com> and Jan Kratochvil <jan.kratochvil@redhat.com>. # This test only works on Linux -if { ![isnative] || [is_remote host] || ![istarget *-linux*] } { +if { ![isnative] || [is_remote host] || [target_info exists use_gdb_stub] + || ![istarget *-linux*] } { continue } |