From: Daniel Jacobowitz Date: Thu, 22 Jun 2006 19:53:46 +0000 (+0000) Subject: * gdb.base/gdb1555.exp: Use gdb_compile_shlib. Skip if not X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=9af2e58deb8f53a704dffeffd560185651f8c9c4;p=binutils-gdb.git * gdb.base/gdb1555.exp: Use gdb_compile_shlib. Skip if not native. --- diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index 686aee86606..16c64376051 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2006-06-22 Daniel Jacobowitz + + * gdb.base/gdb1555.exp: Use gdb_compile_shlib. Skip if not + native. + 2006-06-22 Daniel Jacobowitz * gdb.stabs/exclfwd.exp: Skip the test if configure did not diff --git a/gdb/testsuite/gdb.base/gdb1555.exp b/gdb/testsuite/gdb.base/gdb1555.exp index 8bea6329160..f7cfe7560fb 100644 --- a/gdb/testsuite/gdb.base/gdb1555.exp +++ b/gdb/testsuite/gdb.base/gdb1555.exp @@ -30,59 +30,29 @@ set libfile gdb1555 set srcfile ${testfile}.c set binfile ${objdir}/${subdir}/${testfile} -remote_exec build "rm -f ${binfile}" - -# get the value of gcc_compiled -if [get_compiler_info ${binfile}] { - return -1 -} - -if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}.o" object {debug}] != "" } { - return -1 -} +set libsrc "${srcdir}/${subdir}/${libfile}.c" +set libobj "${objdir}/${subdir}/${libfile}.so" +set execsrc "${srcdir}/${subdir}/${srcfile}" -# Build the shared libraries this test case needs. -# +remote_exec build "rm -f ${binfile}" -if {$gcc_compiled == 0} { - if [istarget "hppa*-hp-hpux*"] then { - set additional_flags "additional_flags=+z" - } elseif { [istarget "mips-sgi-irix*"] } { - # Disable SGI compiler's implicit -Dsgi - set additional_flags "additional_flags=-Usgi" - } else { - # don't know what the compiler is... - set additional_flags "" - } -} else { - if { ([istarget "powerpc*-*-aix*"] - || [istarget "rs6000*-*-aix*"]) } { - set additional_flags "" - } else { - set additional_flags "additional_flags=-fpic" - } +# Are we on a target board? No support for downloading shared libraries +# to a target yet. +if ![isnative] then { + return 0 } -set additional_flags "$additional_flags -shared" -if {[gdb_compile "${srcdir}/${subdir}/${libfile}.c" "${objdir}/${subdir}/${libfile}.so" executable [list debug $additional_flags "incdir=${objdir}"]] != ""} { +# get the value of gcc_compiled +if [get_compiler_info ${binfile}] { return -1 } -if { ($gcc_compiled -&& ([istarget "powerpc*-*-aix*"] -|| [istarget "rs6000*-*-aix*"] )) } { - set additional_flags "additional_flags=-L${objdir}/${subdir}" -} elseif { [istarget "mips-sgi-irix*"] } { - set additional_flags "additional_flags=-rpath ${objdir}/${subdir}" -} else { - set additional_flags "" -} - -if {[gdb_compile "${objdir}/${subdir}/${testfile}.o ${objdir}/${subdir}/${libfile}.so" "${binfile}" executable [list debug $additional_flags]] != ""} { +if { [gdb_compile_shlib $libsrc $libobj {debug}] != "" + || [gdb_compile $execsrc ${binfile} executable \ + [list debug shlib=${libobj}]] != "" } { return -1 } - gdb_exit gdb_start gdb_reinitialize_dir $srcdir/$subdir