diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 4c34daa7fb8..6492c098c0c 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,11 @@
+2003-03-12  John David Anglin  <dave.anglin@nrc-cnrc.gc.ca>
+
+	* gcc.dg/special/ecos.exp (gcsec-1.c): Find linker used by gcc.
+	* gcc.dg/old-style-asm-1.c (dg-final): Add hpux label alternative to
+	regular expression.
+	* gcc.dg/funcorder.c (dg-final): Check for "link_error,%r" on hppa*-*-*.
+	* gcc.dg/inline-1.c (dg-final): Check for "xyzzy?,%r" on hppa*-*-*.
+
 2003-03-12  Daniel Jacobowitz  <drow@mvista.com>
 
 	* gcc.c-torture/execute/20030224-2.c: New test.
diff --git a/gcc/testsuite/gcc.dg/funcorder.c b/gcc/testsuite/gcc.dg/funcorder.c
index 0dec72c7d02..b064d1cc467 100644
--- a/gcc/testsuite/gcc.dg/funcorder.c
+++ b/gcc/testsuite/gcc.dg/funcorder.c
@@ -1,6 +1,6 @@
 /* { dg-do compile } */
 /* { dg-options "-O2 -funit-at-a-time" } */
-/* { dg-final { scan-assembler-not "link_error" } } */
+/* { dg-final { if [ istarget hppa*-*-* ] { scan-assembler-not "link_error,%r" } else { scan-assembler-not "link_error" } } } */
 /*  In unit-at-time the functions should be assembled in order
     e q t main, so we realize that they are pure.  */
  
diff --git a/gcc/testsuite/gcc.dg/inline-1.c b/gcc/testsuite/gcc.dg/inline-1.c
index 17a9a2f7243..4dce611d912 100644
--- a/gcc/testsuite/gcc.dg/inline-1.c
+++ b/gcc/testsuite/gcc.dg/inline-1.c
@@ -1,7 +1,7 @@
 /* Verify that DECL_INLINE gets copied between DECLs properly.  */
 /* { dg-do compile } */
 /* { dg-options "-O1" } */
-/* { dg-final { scan-assembler-not "xyzzy" } } */
+/* { dg-final { if [ istarget hppa*-*-* ] { scan-assembler-not "xyzzy?,%r" } else { scan-assembler-not "xyzzy" } } } */
 
 /* Test that declaration followed by definition inlines.  */
 static inline int xyzzy0 (int);
diff --git a/gcc/testsuite/gcc.dg/old-style-asm-1.c b/gcc/testsuite/gcc.dg/old-style-asm-1.c
index a265fe10d84..c33707e609c 100644
--- a/gcc/testsuite/gcc.dg/old-style-asm-1.c
+++ b/gcc/testsuite/gcc.dg/old-style-asm-1.c
@@ -24,4 +24,4 @@ void foo(int v)
    because for example it depends on the target macro
    ASM_GENERATE_INTERNAL_LABEL to generate a name matching this regexp (as
    with the default definition).  */
-/* { dg-final { scan-assembler "L(:)?2" } } */
+/* { dg-final { scan-assembler "L(:|\\\$0*)?2" } } */
diff --git a/gcc/testsuite/gcc.dg/special/ecos.exp b/gcc/testsuite/gcc.dg/special/ecos.exp
index b8875023ae1..835233f1d4b 100644
--- a/gcc/testsuite/gcc.dg/special/ecos.exp
+++ b/gcc/testsuite/gcc.dg/special/ecos.exp
@@ -155,7 +155,9 @@ if { [ check_weak_available ] == 1 } {
 # gcsec-1.c
 ###########
 
-set ld_output [ remote_exec host "[ find_ld ]" "--help" ]
+# Check if the ld used by gcc supports --gc-sections.
+set gcc_ld [lindex [gcc_target_compile "-print-prog-name=ld" "" "none" ""] 0]
+set ld_output [remote_exec host "$gcc_ld" "--help"]
 
 # AIX gld supports garbage collection. But AIX gcc does not support 
 # -ffunction-sections or -fdata-sections.