* ld-selective/keepdot.s: Remove section specifier.

[deliverable/binutils-gdb.git] / ld / testsuite / ld-selective / selective.exp

diff --git a/ld/testsuite/ld-selective/selective.exp b/ld/testsuite/ld-selective/selective.exp
index 7e9d3b133a53d58bcde241b3b9132853c65ccb23..b4bc2ec1045c2c0b90fb63d425b78521fcfc2d54 100644 (file)
--- a/ld/testsuite/ld-selective/selective.exp
+++ b/ld/testsuite/ld-selective/selective.exp
@@ -1,5 +1,5 @@
 # Expect script for LD selective linking tests
-#   Copyright 1998, 1999, 2000, 2001 Free Software Foundation, Inc.
+#   Copyright 1998, 1999, 2000, 2001, 2002 Free Software Foundation, Inc.
 #
 # This file is free software; you can redistribute it and/or modify
 # it under the terms of the GNU General Public License as published by
@@ -19,6 +19,11 @@
 # Make sure that constructors are handled correctly.
 
 
+# AOUT based ports do not support selective linking
+if {[istarget "vax-*-ultrix*"]} {
+    return
+}
+
 # COFF based ports do not support selective linking
 if {[istarget "*-*-coff"]} {
     return
@@ -38,12 +43,13 @@ if {[istarget "*-*-pe"]} {
 #
 # FIXME: Instead of table, read settings from each source-file.
 set seltests {
-  {selective1 C 1.c {} {} {dropme1 dropme2} {alpha*-*}}
-  {selective2 C 2.c {} {} {foo} {alpha*-* mips*-*}}
-  {selective3 C 2.c {-u foo} {foo} {{foo 0}} {mips*-*}}
-  {selective4 C++ 3.cc {} {start foo__1A foo__1B} {bar__1A} {alpha*-* mips*-*}}
-  {selective5 C++ 4.cc {} {} {foo__1B foo__1A} {alpha*-* mips*-*}}
-  {selective6 C++ 5.cc {} {} {foo__1B foo__1A dropme1__Fv dropme2__Fv} {*-*-*}}
+  {selective1 C   1.c  {}       {}    {dropme1 dropme2} {alpha*-*}}
+  {selective2 C   2.c  {}       {}    {foo} {alpha*-* mips*-*}}
+  {selective3 C   2.c  {-u foo} {foo} {{foo 0}} {mips*-*}}
+  {selective4 C++ 3.cc {}       {start a A::foo() B::foo()} {A::bar()} {alpha*-*  mips*-*}}
+  {selective5 C++ 4.cc {}       {start a A::bar()} {A::foo() B::foo()} {alpha*-*  mips*-*}}
+  {selective6 C++ 5.cc {}       {start a A::bar()}
+    {A::foo() B::foo() dropme1() dropme2()} {*-*-*}}
 }
 
 set cflags "-w -O -ffunction-sections -fdata-sections"
@@ -87,7 +93,7 @@ foreach testitem $seltests {
     # leave as is.
     if { ![ld_compile "$CC $testflags" $srcdir/$subdir/$testfile $objfile] } {
        unresolved $testname
-       return
+       continue
     }
 
     # V850 targets need libgcc.a
@@ -95,6 +101,11 @@ foreach testitem $seltests {
        set objfile "$objfile -L ../gcc -lgcc"
     }
     
+    # ARM targets need libgcc.a in THUMB mode so that __call_via_r3 is provided
+    if {[istarget arm-*-*] || [istarget xscale-*-*]} {
+       set objfile "$objfile -L ../gcc -lgcc"
+    }
+    
     # m6811/m6812 code has references to soft registers.
     if {[istarget m6811-*-*] || [istarget m6812-*-*]} {
        set objfile "$objfile --defsym _.frame=0 --defsym _.d1=0"
@@ -106,11 +117,18 @@ foreach testitem $seltests {
        continue
     }
 
-    if ![ld_nm $nm "" $ldfile] {
+    if ![ld_nm $nm --demangle $ldfile] {
        unresolved $testname
        continue
     }
 
+    # Must make V2 demangled names look like V3
+    foreach nm_output_key [array names nm_output] {
+       if [regsub \\(void\\) $nm_output_key () new_nm_output_key] {
+           set nm_output($new_nm_output_key) nm_output($nm_output_key)
+       }
+    }
+
     # Check each mandated symbol and optionally mandated values. 
     foreach mustsym $mustsyms {
        if { [llength [concat $mustsym]] == 1 } {
@@ -171,4 +189,3 @@ foreach testitem $seltests {
        pass $testname
     }
 }
-