From: Andrew Burgess Date: Thu, 1 Feb 2024 09:59:32 +0000 (+0000) Subject: gdb/testsuite: fix duplicate test names in gdb.base/cond-eval-mode.exp X-Git-Tag: gdb-15-branchpoint~1078 X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=025f70c8614ecd7293940dcf03b2691adf586031;p=thirdparty%2Fbinutils-gdb.git gdb/testsuite: fix duplicate test names in gdb.base/cond-eval-mode.exp Fix some duplicate test names in gdb.base/cond-eval-mode.exp when running with native-gdbserver or native-extended-gdbserver board files. I've just added some 'with_test_prefix' blocks to make the test names unique, there should be no change in what is tested after this commit. --- diff --git a/gdb/testsuite/gdb.base/cond-eval-mode.exp b/gdb/testsuite/gdb.base/cond-eval-mode.exp index 52f73ba13b5..cd1b78bf2ab 100644 --- a/gdb/testsuite/gdb.base/cond-eval-mode.exp +++ b/gdb/testsuite/gdb.base/cond-eval-mode.exp @@ -83,39 +83,43 @@ proc test_break { break_command } { with_test_prefix "$break_command" { delete_breakpoints - gdb_test "$break_command foo" "reakpoint.* at .*" - - # A condition that evals true. - gdb_test "condition \$bpnum cond_global==0" ".*" - - set can_do_cmd 0 - - set test "continue" - gdb_test_multiple $test $test { - -re "You may have requested too many.*$gdb_prompt $" { - pass $test + with_test_prefix "true condition" { + gdb_test "$break_command foo" "reakpoint.* at .*" + + # A condition that evals true. + gdb_test "condition \$bpnum cond_global==0" ".*" + + set can_do_cmd 0 + + set test "continue" + gdb_test_multiple $test $test { + -re "You may have requested too many.*$gdb_prompt $" { + pass $test + } + -re "Breakpoint .*, foo .*$gdb_prompt $" { + pass $test + set can_do_cmd 1 + } } - -re "Breakpoint .*, foo .*$gdb_prompt $" { - pass $test - set can_do_cmd 1 - } - } - if { !$can_do_cmd } { - unsupported "no target support" - return + if { !$can_do_cmd } { + unsupported "no target support" + return + } } - delete_breakpoints + with_test_prefix "false condition" { + delete_breakpoints - gdb_test "$break_command foo" ".*reakpoint .* at .*" + gdb_test "$break_command foo" ".*reakpoint .* at .*" - # A condition that evals false. - gdb_test "condition \$bpnum cond_global==1" ".*" + # A condition that evals false. + gdb_test "condition \$bpnum cond_global==1" ".*" - gdb_test "b bar" "Breakpoint .* at .*" + gdb_test "b bar" "Breakpoint .* at .*" - gdb_test "continue" "Breakpoint .*, bar .*" + gdb_test "continue" "Breakpoint .*, bar .*" + } } } @@ -132,41 +136,45 @@ proc test_watch { watch_command } { return } - delete_breakpoints + with_test_prefix "true condition" { + delete_breakpoints - gdb_test "$watch_command global" ".*atchpoint .*: global.*" + gdb_test "$watch_command global" ".*atchpoint .*: global.*" - # A condition that evals true. - gdb_test "condition \$bpnum cond_global==0" ".*" + # A condition that evals true. + gdb_test "condition \$bpnum cond_global==0" ".*" - set can_do_cmd 0 + set can_do_cmd 0 - set test "continue" - gdb_test_multiple $test $test { - -re "You may have requested too many.*$gdb_prompt $" { - pass $test - } - -re "atchpoint .*: global.*$gdb_prompt $" { - pass $test - set can_do_cmd 1 + set test "continue" + gdb_test_multiple $test $test { + -re "You may have requested too many.*$gdb_prompt $" { + pass $test + } + -re "atchpoint .*: global.*$gdb_prompt $" { + pass $test + set can_do_cmd 1 + } } - } - if { !$can_do_cmd } { - unsupported "no target support" - return + if { !$can_do_cmd } { + unsupported "no target support" + return + } } - delete_breakpoints + with_test_prefix "false condition" { + delete_breakpoints - gdb_test "$watch_command global" ".*atchpoint .*: global.*" + gdb_test "$watch_command global" ".*atchpoint .*: global.*" - # A condition that evals false. - gdb_test "condition \$bpnum cond_global==1" ".*" + # A condition that evals false. + gdb_test "condition \$bpnum cond_global==1" ".*" - gdb_test "b bar" "Breakpoint .* at .*" + gdb_test "b bar" "Breakpoint .* at .*" - gdb_test "continue" "Breakpoint .*, bar .*" + gdb_test "continue" "Breakpoint .*, bar .*" + } } }