diff options
| author | Tom Tromey <tom@tromey.com> | 2024-10-09 15:29:13 -0600 |
|---|---|---|
| committer | Tom Tromey <tom@tromey.com> | 2024-12-03 18:42:57 -0700 |
| commit | e69d35f45e050058b5f66c635999407e4aef508f (patch) | |
| tree | e79e8ea73fbe27002e86124b9c660d064ff3e9a1 /gdb/testsuite/gdb.python/py-arch-reg-groups.exp | |
| parent | 17ecffd7669d605273d1f9951118b6ab1c09ed45 (diff) | |
| download | binutils-e69d35f45e050058b5f66c635999407e4aef508f.zip binutils-e69d35f45e050058b5f66c635999407e4aef508f.tar.gz binutils-e69d35f45e050058b5f66c635999407e4aef508f.tar.bz2 | |
Use ui-out table in "maint print reggroups"
This changes the "maint print reggroups" command to use a ui-out table
rather than printf.
It also fixes a typo I noticed in a related test case name; and lets
us finally remove the leading \s from the regexp in completion.exp.
Reviewed-by: Christina Schimpe <christina.schimpe@intel.com>
Approved-By: Andrew Burgess <aburgess@redhat.com>
Diffstat (limited to 'gdb/testsuite/gdb.python/py-arch-reg-groups.exp')
| -rw-r--r-- | gdb/testsuite/gdb.python/py-arch-reg-groups.exp | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/gdb/testsuite/gdb.python/py-arch-reg-groups.exp b/gdb/testsuite/gdb.python/py-arch-reg-groups.exp index 4ff3e9c..e3646f5 100644 --- a/gdb/testsuite/gdb.python/py-arch-reg-groups.exp +++ b/gdb/testsuite/gdb.python/py-arch-reg-groups.exp @@ -32,10 +32,10 @@ if ![runto_main] { set groups {} set test "maint print reggroups" gdb_test_multiple $test $test { - -re ".*Group\[ \t\]+Type\[ \t\]+\r\n" { + -re "Group\[ \t\]+Type\[ \t\]+\r\n" { exp_continue } - -re "^ (\[^ \t\]+)\[ \t\]+\[^\r\n\]+\r\n" { + -re "^(\[^ \t\]+)\[ \t\]+\[^\r\n\]+\r\n" { lappend groups $expect_out(1,string) exp_continue } @@ -74,7 +74,7 @@ gdb_test_multiple "python print (\"\\n\".join (groups))" \ gdb_assert {[llength $py_groups] > 0} \ "Found at least one register group from python" gdb_assert {[llength $py_groups] == [llength $groups]} \ - "Same numnber of registers groups found" + "Same number of registers groups found" set found_non_match 0 for { set i 0 } { $i < [llength $groups] } { incr i } { |