mirrors/binutils-gdb
0
0
Fork 0
mirror of https://sourceware.org/git/binutils-gdb.git synced 2024-12-04 15:54:25 +08:00
Code Issues Actions Packages Projects Releases Wiki Activity

2012-07-19 Pedro Alves <palves@redhat.com>

Browse Source 
* config/monitor.exp (gdb_load): Remove redundant ';' in for loop.
	* config/vx.exp (gdb_start): Likewise.
	* gdb.base/printcmds.exp (test_print_repeats_10): Likewise.
	* gdb.base/setvar.exp (test_set): Likewise.
	* gdb.base/sigall.exp: Use foreach+lrange instead of for+continue.
	* gdb.reverse/sigall-precsave.exp: Likewise.
	* gdb.reverse/sigall-reverse.exp: Likewise.
This commit is contained in:
Pedro Alves 2012-07-19 20:00:59 +00:00
parent 961bd387ba
commit 13e4e967fc
8 changed files with 20 additions and 40 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
gdb/testsuite/ChangeLog
View File

@ -1,3 +1,13 @@
2012-07-19 Pedro Alves <palves@redhat.com>
* config/monitor.exp (gdb_load): Remove redundant ';' in for loop.
* config/vx.exp (gdb_start): Likewise.
* gdb.base/printcmds.exp (test_print_repeats_10): Likewise.
* gdb.base/setvar.exp (test_set): Likewise.
* gdb.base/sigall.exp: Use foreach+lrange instead of for+continue.
* gdb.reverse/sigall-precsave.exp: Likewise.
* gdb.reverse/sigall-reverse.exp: Likewise.
2012-07-19 Pedro Alves <palves@redhat.com>
* gdb.reverse/sigall-precsave.exp: Set a breakpoint at each signal

2
gdb/testsuite/config/monitor.exp
View File

@ -159,7 +159,7 @@ proc gdb_load { arg } {
set last_gdb_file $arg;
for { set j 1; } { $j <= 2 } {incr j; } {
for { set j 1 } { $j <= 2 } {incr j } {
if [target_info exists gdb,use_standard_load] {
gdb_target_exec;
if ![target_info exists gdb,no_push_conn] {

2
gdb/testsuite/config/vx.exp
View File

@ -59,7 +59,7 @@ proc gdb_start { } {
global reboot
# get a connection to the board
for { set x 0; } { $x < 3 } { incr x } {
for { set x 0 } { $x < 3 } { incr x } {
set shell_id [remote_open target]
if { $shell_id > 0 } {
verbose "Spawn id for remote shell is $shell_id"

4
gdb/testsuite/gdb.base/printcmds.exp
View File

@ -424,9 +424,9 @@ proc test_print_all_chars {} {
proc test_print_repeats_10 {} {
global gdb_prompt decimal
for { set x 1; } { $x <= 16 } { incr x; } {
for { set x 1 } { $x <= 16 } { incr x } {
gdb_test_no_output "set print elements $x"
for { set e 1; } { $e <= 16 } {incr e; } {
for { set e 1 } { $e <= 16 } {incr e } {
set v [expr $e - 1];
set command "p &ctable2\[${v}*16\]"
if { $x < $e } {

2
gdb/testsuite/gdb.base/setvar.exp
View File

@ -77,7 +77,7 @@ proc test_set { args } {
set count 1;
# Set up the variables.
for {set x 0;} {$x < $length} {incr x;} {
for {set x 0} {$x < $length} {incr x} {
if { "[lindex $args $x]" != "" } {
set arg [lindex $args $x];
if { ($x == $final) || ([string first ".*" [lindex $args [expr $x + 1]]] >= 0) } {

8
gdb/testsuite/gdb.base/sigall.exp
View File

@ -182,13 +182,7 @@ set thissig "ABRT"
runto gen_ABRT
for {set i 0;} {$i < [llength $signals]} {incr i;} {
# Skip the first.
if { $i == 0 } {
continue
}
set sig [lindex $signals $i]
foreach sig [lrange $signals 1 end] {
test_one_sig $sig
}

16
gdb/testsuite/gdb.reverse/sigall-precsave.exp
View File

@ -300,13 +300,7 @@ set sig_supported 1
set thissig "ABRT"
# test signal handling
for {set i 0;} {$i < [llength $signals]} {incr i;} {
# Skip the first.
if { $i == 0 } {
continue
}
set sig [lindex $signals $i]
foreach sig [lrange $signals 1 end] {
test_one_sig $sig
}
@ -330,12 +324,6 @@ foreach sig [lreverse $signals] {
set sig_supported 1
set thissig "ABRT"
for {set i 0;} {$i < [llength $signals]} {incr i;} {
# Skip the first.
if { $i == 0 } {
continue
}
set sig [lindex $signals $i]
foreach sig [lrange $signals 1 end] {
test_one_sig $sig
}

16
gdb/testsuite/gdb.reverse/sigall-reverse.exp
View File

@ -248,13 +248,7 @@ set sig_supported 1
set thissig "ABRT"
# test signal handling
for {set i 0;} {$i < [llength $signals]} {incr i;} {
# Skip the first.
if { $i == 0 } {
continue
}
set sig [lindex $signals $i]
foreach sig [lrange $signals 1 end] {
test_one_sig $sig
}
@ -280,12 +274,6 @@ foreach sig [lreverse $signals] {
set sig_supported 1
set thissig "ABRT"
for {set i 0;} {$i < [llength $signals]} {incr i;} {
# Skip the first.
if { $i == 0 } {
continue
}
set sig [lindex $signals $i]
foreach sig [lrange $signals 1 end] {
test_one_sig $sig
}