diff options
Diffstat (limited to 'gdb/testsuite/gdb.server/solib-list.exp')
-rw-r--r-- | gdb/testsuite/gdb.server/solib-list.exp | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/gdb/testsuite/gdb.server/solib-list.exp b/gdb/testsuite/gdb.server/solib-list.exp index 2a23983..564878b 100644 --- a/gdb/testsuite/gdb.server/solib-list.exp +++ b/gdb/testsuite/gdb.server/solib-list.exp @@ -51,14 +51,15 @@ foreach nonstop { 0 1 } { with_test_prefix "non-stop $nonstop" { gdb_load_shlib ${binlibfile} - set remote_binfile [gdb_remote_download target $binfile] + set target_binfile [gdb_remote_download target $binfile] + set host_binfile [gdb_remote_download host $binfile] # When testing remote, the file path we receive may be only the file name, # "solib-list". ld-linux doesn't seem to be able to find the file when # passing just the file name, it wants either the absolute path or a # relative path with at least one directory component. Calling readlink on # the target to get the full path will make it happy. - set remote_binfile [lindex [remote_exec target "readlink -f $remote_binfile"] 1] + set target_binfile [lindex [remote_exec target "readlink -f $target_binfile"] 1] # Make sure we're disconnected, in case we're testing with an # extended-remote board, therefore already connected. @@ -81,7 +82,7 @@ foreach nonstop { 0 1 } { with_test_prefix "non-stop $nonstop" { # argument here, instead of using gdb_load, because we don't want # to download the interpreter to the target (it's already there) # or to the test output directory. - set res [gdbserver_spawn "${interp_system} ${remote_binfile}"] + set res [gdbserver_spawn "${interp_system} ${target_binfile}"] set gdbserver_protocol [lindex $res 0] set gdbserver_gdbport [lindex $res 1] @@ -89,7 +90,7 @@ foreach nonstop { 0 1 } { with_test_prefix "non-stop $nonstop" { # but before "target remote" below so that qSymbol data get already # initialized from BINFILE (and not from ld.so first needing a change to # BINFILE later). - gdb_test "file ${binfile}" {Reading symbols from .*\.\.\..*} "file binfile" + gdb_test "file ${host_binfile}" {Reading symbols from .*\.\.\..*} "file binfile" set test "target $gdbserver_protocol" set ok 0 |