diff options
author | Andrew Burgess <andrew.burgess@embecosm.com> | 2019-09-15 13:42:54 -0400 |
---|---|---|
committer | Andrew Burgess <andrew.burgess@embecosm.com> | 2019-10-03 17:48:02 +0100 |
commit | 58eb20d527dbb0ebf26c21ecb32263def26d4593 (patch) | |
tree | 3926cc79439d4d563f16f120d4217c10184cb3e2 /gdb | |
parent | 4d4211478f4f3bb61ea3e22937fee234fb31f7cb (diff) | |
download | gdb-58eb20d527dbb0ebf26c21ecb32263def26d4593.zip gdb-58eb20d527dbb0ebf26c21ecb32263def26d4593.tar.gz gdb-58eb20d527dbb0ebf26c21ecb32263def26d4593.tar.bz2 |
gdb/testsuite: Make test names unique in gdb.linespec tests
Make test names unique in the gdb.linespec tests. On my local machine
this removed 43 duplicate test names. It is possible that different
setups might still encounter some duplicates.
gdb/testsuite/ChangeLog:
* gdb.linespec/explicit.exp: Make test names unique.
* gdb.linespec/ls-errs.exp: Likewise.
Diffstat (limited to 'gdb')
-rw-r--r-- | gdb/testsuite/ChangeLog | 5 | ||||
-rw-r--r-- | gdb/testsuite/gdb.linespec/explicit.exp | 6 | ||||
-rw-r--r-- | gdb/testsuite/gdb.linespec/ls-errs.exp | 5 |
3 files changed, 12 insertions, 4 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index b78d16f..4228c26 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,5 +1,10 @@ 2019-10-03 Andrew Burgess <andrew.burgess@embecosm.com> + * gdb.linespec/explicit.exp: Make test names unique. + * gdb.linespec/ls-errs.exp: Likewise. + +2019-10-03 Andrew Burgess <andrew.burgess@embecosm.com> + * gdb.reverse/break-precsave.exp: Make test names unique. * gdb.reverse/break-reverse.exp: Likewise. * gdb.reverse/finish-precsave.exp: Likewise. diff --git a/gdb/testsuite/gdb.linespec/explicit.exp b/gdb/testsuite/gdb.linespec/explicit.exp index e50e503..03f898c 100644 --- a/gdb/testsuite/gdb.linespec/explicit.exp +++ b/gdb/testsuite/gdb.linespec/explicit.exp @@ -104,8 +104,10 @@ namespace eval $testfile { # Test abbreviations set short [string range $arg 0 3] - gdb_test "break -$short" \ - [string_to_regexp "missing argument for \"-$short\""] + if { $arg != $short } { + gdb_test "break -$short" \ + [string_to_regexp "missing argument for \"-$short\""] + } } # Test invalid arguments diff --git a/gdb/testsuite/gdb.linespec/ls-errs.exp b/gdb/testsuite/gdb.linespec/ls-errs.exp index f031c46..0743d89 100644 --- a/gdb/testsuite/gdb.linespec/ls-errs.exp +++ b/gdb/testsuite/gdb.linespec/ls-errs.exp @@ -92,7 +92,8 @@ proc do_test {lang} { gdb_test "break $linespec" [string_to_regexp \ [eval format \$error_messages($msg_id) \ - $args]] + $args]] \ + "'break $linespec'" } # Some commonly used whitespace tests around ':'. @@ -234,7 +235,7 @@ proc do_test {lang} { test_break "main:here${x}" unexpected "end of input" } - foreach x {"3" "+100" "-100" "foo"} { + foreach_with_prefix x {"3" "+100" "-100" "foo"} { test_break "main 3" invalid_function "main 3" test_break "-function \"main $x\"" invalid_function "main $x" if {$x == "foo"} { |