* lib/ld-lib.exp (default_ld_simple_link): Add $gcc_ld_flag before

	any other options in $ld.

diff --git a/ld/testsuite/ChangeLog b/ld/testsuite/ChangeLog
index 5a9fcb9cf689b32b2a483cda5d7127b51739dc19..fdd6a501e85eb1695af7e3078ad6dfca08178a94 100644 (file)
--- a/ld/testsuite/ChangeLog
+++ b/ld/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+2010-07-01  Alan Modra  <amodra@gmail.com>
+
+       * lib/ld-lib.exp (default_ld_simple_link): Add $gcc_ld_flag before
+       any other options in $ld.
+
 2010-06-29  Alan Modra  <amodra@gmail.com>
 
        * ld-maxq/maxq.exp: Delete file.

diff --git a/ld/testsuite/lib/ld-lib.exp b/ld/testsuite/lib/ld-lib.exp
index 9e8b809f83359d03d48a047cd2895643b93b9186..709702a5b68d42475a99d7a65d3ea180982062cc 100644 (file)
--- a/ld/testsuite/lib/ld-lib.exp
+++ b/ld/testsuite/lib/ld-lib.exp
@@ -1,6 +1,6 @@
 # Support routines for LD testsuite.
 #   Copyright 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003,
-#    2004, 2005, 2006, 2007, 2008, 2009  Free Software Foundation, Inc.
+#    2004, 2005, 2006, 2007, 2008, 2009, 2010  Free Software Foundation, Inc.
 #
 # This file is part of the GNU Binutils.
 #
@@ -179,17 +179,20 @@ proc default_ld_simple_link { ld target objects } {
     # based on the name of the compiler.
     set ldexe $ld
     set ldparm [string first " " $ld]
+    set ldflags ""
     if { $ldparm > 0 } then {
+       set ldflags [string range $ld $ldparm end]
        set ldexe [string range $ld 0 $ldparm]
+       set ld $ldexe
     }
     set ldexe [string replace $ldexe 0 [string last "/" $ldexe] ""]
     if {[string match "*gcc*" $ldexe] || [string match "*++*" $ldexe]} then {
-       set flags "$gcc_ld_flag $flags"
+       set ldflags "$gcc_ld_flag $ldflags"
     }
 
     remote_file host delete $target
 
-    set exec_output [run_host_cmd "$ld" "$flags -o $target $objects"]
+    set exec_output [run_host_cmd "$ld" "$ldflags $flags -o $target $objects"]
     set exec_output [prune_warnings $exec_output]
 
     # We don't care if we get a warning about a non-existent start