espressif/binutils-gdb
1
0
Fork 0
mirror of https://github.com/espressif/binutils-gdb.git synced 2025-06-20 01:50:24 +08:00
Code Issues Packages Projects Releases Wiki Activity

[gdb/testsuite] Simplify gdb.base/sect-cmd.exp

Browse Source 
While looking at gdb.base/sect-cmd.exp, I noticed a few things that can be
simplified:
- use gdb_test instead of gdb_test_multiple
- use -wrap "" as regexp

Also, I noticed this:
...
           fail "$gdb_test_name, saw not found marker"
...
while our usual test naming scheme uses parentheses, like so:
...
           fail "$gdb_test_name (saw not found marker)"
...

Fix the test-name and do the simplifications.

Tested on x86_64-linux.

gdb/testsuite/ChangeLog:

2021-06-08  Tom de Vries  <tdevries@suse.de>

	* gdb.base/sect-cmd.exp: Use gdb_test.  Use -wrap "".  Fix
	test name.
This commit is contained in:
Tom de Vries
2021-06-08 10:04:44 +02:00
parent 25ff4de715
commit ac6c175edd
2 changed files with 11 additions and 13 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
gdb/testsuite/ChangeLog
View File

@ -1,3 +1,8 @@
2021-06-08 Tom de Vries <tdevries@suse.de>
* gdb.base/sect-cmd.exp: Use gdb_test. Use -wrap "". Fix
test name.
2021-06-08 Tom de Vries <tdevries@suse.de> 2021-06-08 Tom de Vries <tdevries@suse.de>
* gdb.base/sect-cmd.exp: Fix saw_section_address_line regexp. * gdb.base/sect-cmd.exp: Fix saw_section_address_line regexp.

19
gdb/testsuite/gdb.base/sect-cmd.exp
View File

@ -63,21 +63,17 @@ gdb_test_multiple "section $section_name $address1" \
exp_continue exp_continue
} }
-re "Section \[^\r\n\]+ not found\r\n" { -re "Section \[^\r\n\]+ not found\r\n" {
fail "$gdb_test_name, saw not found marker" fail "$gdb_test_name (saw not found marker)"
exp_continue exp_continue
} }
-re "$gdb_prompt $" { -re -wrap "" {
gdb_assert { $saw_section_address_line } $gdb_test_name gdb_assert { $saw_section_address_line } $gdb_test_name
} }
} }
# Verify that GDB responds gracefully to a non-existent section name. # Verify that GDB responds gracefully to a non-existent section name.
# #
gdb_test_multiple "section FOOBARBAZ 0x1234" "" { gdb_test "section FOOBARBAZ 0x1234" "Section FOOBARBAZ not found"
-re -wrap "Section FOOBARBAZ not found" {
pass $gdb_test_name
}
}
# Check that GDB can still print the error message when the section # Check that GDB can still print the error message when the section
# name is very long. It used to be the case that GDB could only print # name is very long. It used to be the case that GDB could only print
@ -86,9 +82,6 @@ gdb_test_multiple "section FOOBARBAZ 0x1234" "" {
# #
set long_sect_name \ set long_sect_name \
"A234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123" "A234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123"
gdb_test_multiple "section $long_sect_name 0x1234" \ gdb_test "section $long_sect_name 0x1234" \
"non-existent too-long section disallowed" { "Section $long_sect_name not found" \
-re -wrap "Section $long_sect_name not found" { "non-existent too-long section disallowed"
pass $gdb_test_name
}
}