From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 2974 invoked by alias); 13 Apr 2005 17:12:17 -0000 Mailing-List: contact gdb-patches-help@sources.redhat.com; run by ezmlm Precedence: bulk List-Subscribe: List-Archive: List-Post: List-Help: , Sender: gdb-patches-owner@sources.redhat.com Received: (qmail 2956 invoked from network); 13 Apr 2005 17:12:12 -0000 Received: from unknown (HELO e35.co.us.ibm.com) (32.97.110.133) by sourceware.org with SMTP; 13 Apr 2005 17:12:12 -0000 Received: from d03relay05.boulder.ibm.com (d03relay05.boulder.ibm.com [9.17.195.107]) by e35.co.us.ibm.com (8.12.10/8.12.9) with ESMTP id j3DHC9Lg040902 for ; Wed, 13 Apr 2005 13:12:10 -0400 Received: from d03av01.boulder.ibm.com (d03av01.boulder.ibm.com [9.17.195.167]) by d03relay05.boulder.ibm.com (8.12.10/NCO/VER6.6) with ESMTP id j3DHC9AM254714 for ; Wed, 13 Apr 2005 11:12:09 -0600 Received: from d03av01.boulder.ibm.com (loopback [127.0.0.1]) by d03av01.boulder.ibm.com (8.12.11/8.12.11) with ESMTP id j3DHC9jA011307 for ; Wed, 13 Apr 2005 11:12:09 -0600 Received: from dyn9047022123-009047022128.beaverton.ibm.com (dyn9047022123-009047022128.beaverton.ibm.com [9.47.22.128]) by d03av01.boulder.ibm.com (8.12.11/8.12.11) with ESMTP id j3DHC8L8011292 for ; Wed, 13 Apr 2005 11:12:09 -0600 From: Paul Gilliam Reply-To: pgilliam@us.ibm.com To: gdb-patches@sources.redhat.com Subject: [patch] update gdb.base/gdb1555.exp to use new shared library infrastructure Date: Wed, 13 Apr 2005 17:12:00 -0000 User-Agent: KMail/1.6.2 MIME-Version: 1.0 Content-Disposition: inline Content-Type: text/plain; charset="us-ascii" Content-Transfer-Encoding: 7bit Message-Id: <200504131011.18676.pgilliam@us.ibm.com> X-SW-Source: 2005-04/txt/msg00113.txt.bz2 This patch updates gdb.base/gdb1555.exp to use the new shared library infrastructure in lib/gdb.exp. All the stuff that has been cut from shlib-call.exp is now part of 'gdb-compile' or 'gdb-compile-shlib' (new) in lib/gdb.exp. This patch depends on the shared infrastructure patch: http://sources.redhat.com/ml/gdb-patches/2005-04/msg00096.html -=# Paul #=- 2005-04-13 Paul Gilliam * gdb.base/gdb1555.exp: Change to use new shared library infrastructure and update copyright date. Index: gdb.base/gdb1555.exp =================================================================== RCS file: /cvs/src/src/gdb/testsuite/gdb.base/gdb1555.exp,v retrieving revision 1.1 diff -c -3 -p -r1.1 gdb1555.exp *** gdb.base/gdb1555.exp 18 Feb 2004 03:35:08 -0000 1.1 --- gdb.base/gdb1555.exp 13 Apr 2005 17:08:43 -0000 *************** if $tracelevel then { *** 27,87 **** set testfile gdb1555-main 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 ! } ! ! # Build the shared libraries this test case needs. ! # ! ! 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" ! } ! } ! ! set additional_flags "$additional_flags -shared" ! if {[gdb_compile "${srcdir}/${subdir}/${libfile}.c" "${objdir}/${subdir}/${libfile}.so" executable [list debug $additional_flags "incdir=${objdir}"]] != ""} { ! 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]] != ""} { ! return -1 } gdb_exit gdb_start --- 27,50 ---- set testfile gdb1555-main set libfile gdb1555 ! set srcfile $srcdir/$subdir/$testfile.c ! set libsrc $srcdir/$subdir/$libfile.c ! set binfile $objdir/$subdir/$testfile ! set lib_sl $objdir/$subdir/$libfile.sl ! set lib_opts debug ! set exec_opts [list debug shlib=$lib_sl] if [get_compiler_info ${binfile}] { return -1 } ! if {[gdb_compile_shlib $libsrc $lib_sl $lib_opts] != "" ! || [gdb_compile $srcfile $binfile executable $exec_opts] != ""} { ! gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail." } + # Start with a fresh gdb. gdb_exit gdb_start