aboutsummaryrefslogtreecommitdiff
path: root/gdb
diff options
context:
space:
mode:
authorJan Kratochvil <jan.kratochvil@redhat.com>2011-10-28 17:32:30 +0000
committerJan Kratochvil <jan.kratochvil@redhat.com>2011-10-28 17:32:30 +0000
commit3a3dad982f5399fb86a5ea5a7fb1ba203c3c03e0 (patch)
tree4a1d167aa6f85cd0aab1b847326a85fda377c225 /gdb
parent821296b70dcf3e91ce92fb78b9360e3ff06d0494 (diff)
downloadgdb-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/ChangeLog16
-rw-r--r--gdb/testsuite/gdb.base/async-shell.exp5
-rw-r--r--gdb/testsuite/gdb.base/attach-pie-misread.exp3
-rw-r--r--gdb/testsuite/gdb.base/break-interp.exp3
-rw-r--r--gdb/testsuite/gdb.base/default.exp38
-rw-r--r--gdb/testsuite/gdb.dwarf2/dw2-restore.exp7
-rw-r--r--gdb/testsuite/gdb.python/py-events.exp4
-rw-r--r--gdb/testsuite/gdb.threads/attach-into-signal.exp3
-rw-r--r--gdb/testsuite/gdb.threads/attach-stopped.exp3
-rw-r--r--gdb/testsuite/gdb.threads/attachstop-mt.exp3
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
}