yggdrasil/binutils-gdb
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

* lib/mi-support.exp (mi_load_shlibs): New.

Browse Source 
* gdb.mi/mi-pending.exp: Use mi_load_shlibs, not gdb_load_shlibs.
This commit is contained in:
Vladimir Prus 2008-07-31 07:38:51 +00:00
parent 49314f8728
commit 5e06a3d1d5
3 changed files with 21 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
gdb/testsuite/ChangeLog
View File

@ -1,3 +1,8 @@
2008-07-31 Vladimir Prus <vladimir@codesourcery.com>
* lib/mi-support.exp (mi_load_shlibs): New.
* gdb.mi/mi-pending.exp: Use mi_load_shlibs, not gdb_load_shlibs.
2008-07-30 Vladimir Prus <vladimir@codesourcery.com>
* lib/mi-support.exp (get_mi_thread_list)

2
gdb/testsuite/gdb.mi/mi-pending.exp
View File

@ -56,7 +56,7 @@ gdb_exit
mi_gdb_start
mi_gdb_reinitialize_dir $srcdir/$subdir
mi_gdb_load ${binfile}
gdb_load_shlibs $lib_sl
mi_load_shlibs $lib_sl
if [target_info exists gdb_stub] {
gdb_step_for_stub;

15
gdb/testsuite/lib/mi-support.exp
View File

@ -1681,3 +1681,18 @@ proc check_mi_and_console_threads {name} {
}
}
}
proc mi_load_shlibs { args } {
if {![is_remote target]} {
return
}
foreach file $args {
gdb_download $file
}
# Even if the target supplies full paths for shared libraries,
# they may not be paths for this system.
mi_gdb_test "set solib-search-path [file dirname [lindex $args 0]]" "\^done" ""
}