diff options
| author | Ulrich Weigand <uweigand@de.ibm.com> | 2011-11-30 08:24:32 +0000 |
|---|---|---|
| committer | Ulrich Weigand <uweigand@de.ibm.com> | 2011-11-30 08:24:32 +0000 |
| commit | 4255c8d248bc8e2d5e8286dc600ad267bd788c59 (patch) | |
| tree | d554aeb62b4f5f6037c1c34e7d10cf6e160ee45f /gdb/testsuite/gdb.fortran | |
| parent | 2e2a0124042d940e69f7e1fff7e52beee3e1aa98 (diff) | |
* gdb.base/solib-nodir.exp: Skip if remote target.
* gdb.base/gdb.fortran.exp: Use shlib= flag when linking main
application. Call gdb_load_shlibs.
* gdb.mi/mi-solib.exp: Use mi_load_shlibs instead of gdb_load_shlibs.
Diffstat (limited to 'gdb/testsuite/gdb.fortran')
| -rw-r--r-- | gdb/testsuite/gdb.fortran/library-module.exp | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/gdb/testsuite/gdb.fortran/library-module.exp b/gdb/testsuite/gdb.fortran/library-module.exp index 8c9f43c493..f0754f5c52 100644 --- a/gdb/testsuite/gdb.fortran/library-module.exp +++ b/gdb/testsuite/gdb.fortran/library-module.exp @@ -34,13 +34,15 @@ if { [gdb_compile_shlib "${srcdir}/${subdir}/${srclibfile}" $objdir/$subdir/$li # just for the linking phase (and not the source compilation phase). And any # warnings on ignored $libfile abort the process. -if { [gdb_compile [list $srcdir/$subdir/$srcfile $objdir/$subdir/$libfile] $objdir/$subdir/$binfile executable {debug f90}] != "" } { +if { [gdb_compile $srcdir/$subdir/$srcfile $objdir/$subdir/$binfile executable [list debug f90 shlib=$objdir/$subdir/$libfile]] != "" } { untested "Couldn't compile ${srcfile}" return -1 } clean_restart $binfile +gdb_load_shlibs $objdir/$subdir/$libfile + if ![runto MAIN__] then { perror "couldn't run to breakpoint MAIN__" continue |