Add is_generic_elf to ld/ld-lib.exp

Alan Modra amodra@gmail.com
Fri Oct 7 00:49:00 GMT 2016


Written as part of another patch that turned out to be unnecessary.
I think the infrastructure might be useful, so committing this part.

	* testsuite/lib/ld-lib.exp (is_generic_elf): New, extracted from..
	* testsuite/ld-elf/elf.exp: ..here.

diff --git a/ld/testsuite/ld-elf/elf.exp b/ld/testsuite/ld-elf/elf.exp
index 872e7f1..59284bd 100644
--- a/ld/testsuite/ld-elf/elf.exp
+++ b/ld/testsuite/ld-elf/elf.exp
@@ -139,19 +139,7 @@ foreach t $test_list {
 # Targets using the generic linker backend don't support generating
 # an import library.
 set xfail_implib ""
-if { [istarget "d30v-*-*"]
-     || [istarget "dlx-*-*"]
-     || [istarget "fr30-*-*"]
-     || ([istarget "frv-*-*"] && ![istarget "frv-*-linux*"])
-     || [istarget "ft32-*-*"]
-     || [istarget "i860-*-*"]
-     || [istarget "i960-*-*"]
-     || [istarget "iq2000-*-*"]
-     || [istarget "mn10200-*-*"]
-     || [istarget "moxie-*-*"]
-     || [istarget "msp430-*-*"]
-     || [istarget "mt-*-*"]
-     || [istarget "pj*-*-*"] } {
+if [is_generic_elf] {
     set xfail_implib "*-*-*"
 }
 
diff --git a/ld/testsuite/lib/ld-lib.exp b/ld/testsuite/lib/ld-lib.exp
index 616ac51..49c1fb1 100644
--- a/ld/testsuite/lib/ld-lib.exp
+++ b/ld/testsuite/lib/ld-lib.exp
@@ -1773,6 +1773,26 @@ proc check_shared_lib_support { } {
     return 0
 }
 
+# Return true if target uses genelf.em (assuming it is ELF).
+proc is_generic_elf { } {
+    if { [istarget "d30v-*-*"]
+	 || [istarget "dlx-*-*"]
+	 || [istarget "fr30-*-*"]
+	 || ([istarget "frv-*-*"] && ![istarget "frv-*-linux*"])
+	 || [istarget "ft32-*-*"]
+	 || [istarget "i860-*-*"]
+	 || [istarget "i960-*-*"]
+	 || [istarget "iq2000-*-*"]
+	 || [istarget "mn10200-*-*"]
+	 || [istarget "moxie-*-*"]
+	 || [istarget "msp430-*-*"]
+	 || [istarget "mt-*-*"]
+	 || [istarget "pj*-*-*"] } {
+	return 1;
+    }
+    return 0;
+}
+
 # Returns true if the target ld supports the plugin API.
 proc check_plugin_api_available { } {
     global plugin_api_available_saved

-- 
Alan Modra
Australia Development Lab, IBM



More information about the Binutils mailing list