* ld-selective/keepdot.s: Remove section specifier.
[deliverable/binutils-gdb.git] / ld / testsuite / ld-selective / selective.exp
index 111d2690223c24854c7c4638641637feaab9fa58..b4bc2ec1045c2c0b90fb63d425b78521fcfc2d54 100644 (file)
@@ -1,5 +1,5 @@
 # Expect script for LD selective linking tests
-#   Copyright (C) 1998, 1999, 2000 Free Software Foundation
+#   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
 # 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,22 +43,23 @@ if {[istarget "*-*-pe"]} {
 #
 # FIXME: Instead of table, read settings from each source-file.
 set seltests {
-  {selective1 C 1.c {} {} {dropme1 dropme2} {}}
-  {selective2 C 2.c {} {} {foo} {}}
-  {selective3 C 2.c {-u foo} {foo} {{foo 0}} {}}
-  {selective4 C++ 3.cc {} {start foo__1A foo__1B} {bar__1A} {v850*-*-elf}}
-  {selective5 C++ 4.cc {} {} {foo__1B foo__1A} {}}
-  {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 -O2 -ffunction-sections -fdata-sections"
+set cflags "-w -O -ffunction-sections -fdata-sections"
 set cxxflags "-fvtable-gc -fno-exceptions -fno-rtti"
 set ldflags "--gc-sections -Bstatic"
 
 # If we don't have g++ for the target, mark all tests as untested.
 if { [which $CXX] == 0 } {
     foreach testitem $seltests {
-       untested "[lindex $seltests 0]"
+       untested "[lindex $testitem 0]"
     }
     return
 }
@@ -87,7 +93,23 @@ foreach testitem $seltests {
     # leave as is.
     if { ![ld_compile "$CC $testflags" $srcdir/$subdir/$testfile $objfile] } {
        unresolved $testname
-       return
+       continue
+    }
+
+    # V850 targets need libgcc.a
+    if [istarget v850*-*-elf] {
+       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"
+       set objfile "$objfile --defsym _.d2=0"
     }
 
     if ![ld_simple_link $ld $ldfile "$ldflags [join $ldargs] $objfile"] {
@@ -95,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 } {
@@ -160,4 +189,3 @@ foreach testitem $seltests {
        pass $testname
     }
 }
-
This page took 0.053858 seconds and 4 git commands to generate.