* config/default.exp (ld_nm): Add "nmflags" arg.
authorAlan Modra <amodra@gmail.com>
Tue, 24 Jul 2001 11:07:16 +0000 (11:07 +0000)
committerAlan Modra <amodra@gmail.com>
Tue, 24 Jul 2001 11:07:16 +0000 (11:07 +0000)
* lib/ld-lib.exp (default_ld_nm): Likewise.
* ld-empic/empic.exp: Adjust call to ld_nm.
* ld-scripts/defined.exp: Likewise.
* ld-scripts/script.exp: Likewise.
* ld-scripts/sizeof.exp: Likewise.
* ld-selective/selective.exp: Likewise.
* ld-sh/sh.exp: Likewise.

ld/testsuite/ChangeLog
ld/testsuite/config/default.exp
ld/testsuite/ld-empic/empic.exp
ld/testsuite/ld-scripts/defined.exp
ld/testsuite/ld-scripts/script.exp
ld/testsuite/ld-scripts/sizeof.exp
ld/testsuite/ld-selective/selective.exp
ld/testsuite/ld-sh/sh.exp
ld/testsuite/lib/ld-lib.exp

index 139d8d9..e36213f 100644 (file)
@@ -1,3 +1,14 @@
+2001-07-24  Alan Modra  <amodra@bigpond.net.au>
+
+       * config/default.exp (ld_nm): Add "nmflags" arg.
+       * lib/ld-lib.exp (default_ld_nm): Likewise.
+       * ld-empic/empic.exp: Adjust call to ld_nm.
+       * ld-scripts/defined.exp: Likewise.
+       * ld-scripts/script.exp: Likewise.
+       * ld-scripts/sizeof.exp: Likewise.
+       * ld-selective/selective.exp: Likewise.
+       * ld-sh/sh.exp: Likewise.
+
 2001-07-12  H.J. Lu  <hjl@gnu.org>
 
        * ld-selective/selective.exp: Mark selective1, selective2,
index 9363c39..7892951 100644 (file)
@@ -158,8 +158,8 @@ proc ld_assemble { as source object } {
 # ld_nm
 #      run nm on a file
 #
-proc ld_nm { nm object } {
-       default_ld_nm $nm $object
+proc ld_nm { nm nmflags object } {
+       default_ld_nm $nm $nmflags $object
 }
 
 #
index 2046970..f72b1f3 100644 (file)
@@ -60,7 +60,7 @@ if ![ld_simple_link $ld tmpdir/relax "--relax -T $srcdir/$subdir/relax.t tmpdir/
     # computes the start of the function.
 
     # Get the symbol table.
-    if ![ld_nm $nm tmpdir/relax] {
+    if ![ld_nm $nm "" tmpdir/relax] {
        unresolved $testname
        return
     }
index eb416df..075bf56 100644 (file)
@@ -28,7 +28,7 @@ if ![ld_assemble $as $srcdir/$subdir/defined.s tmpdir/def.o] {
 if ![ld_simple_link $ld tmpdir/def "-T $srcdir/$subdir/defined.t tmpdir/def.o"] {
     fail $testname
 } else {
-    if ![ld_nm $nm tmpdir/def] {
+    if ![ld_nm $nm "" tmpdir/def] {
        unresolved $testname
     } else {
        if {![info exists nm_output(value1)] \
index d810851..a7f6bad 100644 (file)
@@ -29,7 +29,7 @@ proc check_script { } {
     global testname
     global nm_output
 
-    if ![ld_nm $nm tmpdir/script] {
+    if ![ld_nm $nm "" tmpdir/script] {
        unresolved $testname
     } else {
        if {![info exists nm_output(text_start)] \
index 4b7b024..5bb957a 100644 (file)
@@ -30,7 +30,7 @@ if ![ld_simple_link $ld tmpdir/sizeof "-T $srcdir/$subdir/sizeof.t tmpdir/sizeof
     return
 }
 
-if ![ld_nm $nm tmpdir/sizeof] {
+if ![ld_nm $nm "" tmpdir/sizeof] {
     unresolved $testname
     return
 }
index 27ff2d8..7e9d3b1 100644 (file)
@@ -106,7 +106,7 @@ foreach testitem $seltests {
        continue
     }
 
-    if ![ld_nm $nm $ldfile] {
+    if ![ld_nm $nm "" $ldfile] {
        unresolved $testname
        continue
     }
index 437f7ce..cfbc02c 100644 (file)
@@ -32,7 +32,7 @@ if ![ld_assemble $as "-relax $srcdir/$subdir/sh1.s" tmpdir/sh1.o] {
 } else { if ![ld_simple_link $ld tmpdir/sh1 "-relax tmpdir/sh1.o"] {
     fail $testsimple
 } else {
-    if ![ld_nm $nm tmpdir/sh1] {
+    if ![ld_nm $nm "" tmpdir/sh1] {
        unresolved $testsimple
     } else {
        if {![info exists nm_output(bar)] \
index bd8d211..6c35bb2 100644 (file)
@@ -283,7 +283,7 @@ proc default_ld_assemble { as source object } {
 # default_ld_nm
 #      run nm on a file, putting the result in the array nm_output
 #
-proc default_ld_nm { nm object } {
+proc default_ld_nm { nm nmflags object } {
     global NMFLAGS
     global nm_output
     global host_triplet
@@ -299,9 +299,9 @@ proc default_ld_nm { nm object } {
 
     if ![info exists NMFLAGS] { set NMFLAGS "" }
 
-    verbose -log "$nm $NMFLAGS $object >tmpdir/nm.out"
+    verbose -log "$nm $NMFLAGS $nmflags $object >tmpdir/nm.out"
 
-    catch "exec $nm $NMFLAGS $object >tmpdir/nm.out" exec_output
+    catch "exec $nm $NMFLAGS $nmflags $object >tmpdir/nm.out" exec_output
     set exec_output [prune_warnings $exec_output]
     if [string match "" $exec_output] then {
        set file [open tmpdir/nm.out r]