diff options
author | Simon Marchi <simon.marchi@efficios.com> | 2025-08-14 16:13:01 -0400 |
---|---|---|
committer | Simon Marchi <simon.marchi@efficios.com> | 2025-08-22 16:56:22 -0400 |
commit | 409a49bf88e1fe549000ae9efa206d681afbbfd9 (patch) | |
tree | 28d100f3a6a5b2d0506dbfde9da76ffb6b0b5c9e | |
parent | a63213cd374dc14da82849ddf55044b730a311f4 (diff) | |
download | binutils-409a49bf88e1fe549000ae9efa206d681afbbfd9.zip binutils-409a49bf88e1fe549000ae9efa206d681afbbfd9.tar.gz binutils-409a49bf88e1fe549000ae9efa206d681afbbfd9.tar.bz2 |
gdb/testsuite: fix pattern in gdb.base/dlmopen-ns-ids.exp
I forgot one spot when updating the "info shared" header from NS to
"Linker NS", fix that. This fixes the following failure:
FAIL: gdb.base/dlmopen-ns-ids.exp: check no duplicates: info sharedlibrary
At the same time, fix a couple of things I found when looking at this
code again. One is bad indentation, the other is an unnecessary
parameter.
Change-Id: Ibbc2062699264dde08fd3ff7c503524265c73b0c
-rw-r--r-- | gdb/testsuite/gdb.base/dlmopen-ns-ids.exp | 20 |
1 files changed, 10 insertions, 10 deletions
diff --git a/gdb/testsuite/gdb.base/dlmopen-ns-ids.exp b/gdb/testsuite/gdb.base/dlmopen-ns-ids.exp index 51815c3..c0ce4da 100644 --- a/gdb/testsuite/gdb.base/dlmopen-ns-ids.exp +++ b/gdb/testsuite/gdb.base/dlmopen-ns-ids.exp @@ -46,7 +46,7 @@ if { [build_executable "failed to build" $testfile $srcfile \ # - namespace ID # - name (file path) -proc get_info_shared {{arg ""}} { +proc get_info_shared {} { set from_re "($::hex)\\s+" set to_re "($::hex)\\s+" set ns_re "(?:($::decimal)\\s+)?" @@ -54,19 +54,19 @@ proc get_info_shared {{arg ""}} { set name_re "(\[^\r\n\]+)" set libs {} - gdb_test_multiple "info sharedlibrary $arg" "" { - -re {From\s+To\s+(NS\s+)?Syms Read\s+Shared Object Library\r\n} { - exp_continue + gdb_test_multiple "info sharedlibrary" "" { + -re {From\s+To\s+(Linker NS\s+)?Syms Read\s+Shared Object Library\r\n} { + exp_continue } -re "^${from_re}${to_re}${ns_re}${syms_read_re}${name_re}\r\n" { - set from $expect_out(1,string) - set to $expect_out(2,string) - set ns $expect_out(3,string) - set name $expect_out(4,string) + set from $expect_out(1,string) + set to $expect_out(2,string) + set ns $expect_out(3,string) + set name $expect_out(4,string) - lappend libs [list $from $to $ns $name] - exp_continue + lappend libs [list $from $to $ns $name] + exp_continue } -re {^\(\*\): Shared library is missing debugging information\.\r\n} { |