OpenE2K/binutils-gdb
12
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

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

Browse Source 
* gdb.trace/circ.exp (trace_buffer_normal): Rewrite using
	gdb_test_multiple, and call unsupported instead of fail, if the
	remote side does not support the request.
This commit is contained in:
Pedro Alves 2012-02-15 17:20:07 +00:00
parent a1999d4022
commit a2e0062d4b
2 changed files with 34 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
gdb/testsuite/ChangeLog
View File

@ -1,3 +1,9 @@
2012-02-15 Pedro Alves <palves@redhat.com>
* gdb.trace/circ.exp (trace_buffer_normal): Rewrite using
gdb_test_multiple, and call unsupported instead of fail, if the
remote side does not support the request.
2012-02-15 Pedro Alves <palves@redhat.com>
* gdb.server/ext-attach.exp: Make sure gdb is disconnected.

34
gdb/testsuite/gdb.trace/circ.exp
View File

@ -88,16 +88,38 @@ proc setup_tracepoints { } {
# return 0 for success, 1 for failure
proc trace_buffer_normal { } {
if [gdb_test "maint packet QTBuffer:size:ffffffff" \
"received: .OK." ""] then {
pass "This test cannot be run on this target"
global gdb_prompt
set ok 0
set test "maint packet QTBuffer:size:ffffffff"
gdb_test_multiple $test $test {
-re "received: .OK.\r\n$gdb_prompt $" {
set ok 1
pass $test
}
-re "\r\n$gdb_prompt $" {
}
}
if { !$ok } {
unsupported $test
return 1;
}
if [gdb_test "maint packet QTBuffer:circular:0" \
"received: .OK." ""] then {
pass "This test cannot be run on this target"
set ok 0
set test "maint packet QTBuffer:circular:0"
gdb_test_multiple $test $test {
-re "received: .OK.\r\n$gdb_prompt $" {
set ok 1
pass $test
}
-re "\r\n$gdb_prompt $" {
}
}
if { !$ok } {
unsupported $test
return 1;
}
return 0;
}