This is the mail archive of the
binutils@sourceware.org
mailing list for the binutils project.
Remove duplicate ld testsuite function
- From: Alan Modra <amodra at gmail dot com>
- To: binutils at sourceware dot org
- Date: Sat, 18 Aug 2018 14:16:46 +0930
- Subject: Remove duplicate ld testsuite function
It's in binutils/testsuite/lib/binutils-common.exp
* testsuite/ld-elf/elf.exp (is_elf64): Delete.
diff --git a/ld/testsuite/ld-elf/elf.exp b/ld/testsuite/ld-elf/elf.exp
index cabc79daad..bb7f4b0463 100644
--- a/ld/testsuite/ld-elf/elf.exp
+++ b/ld/testsuite/ld-elf/elf.exp
@@ -73,32 +73,6 @@ run_ld_link_tests [list \
]
-# True if the object format is known to be 64-bit ELF.
-#
-proc is_elf64 { binary_file } {
- global READELF
- global READELFFLAGS
-
- set readelf_size ""
- catch "exec $READELF $READELFFLAGS -h $binary_file > readelf.out" got
-
- if ![string match "" $got] then {
- return 0
- }
-
- if { ![regexp "\n\[ \]*Class:\[ \]*ELF(\[0-9\]+)\n" \
- [file_contents readelf.out] nil readelf_size] } {
- verbose "FAILED to determine ELF size"
- return 0
- }
-
- if { $readelf_size == "64" } {
- return 1
- }
-
- return 0
-}
-
if [is_elf64 tmpdir/symbol3w.a] {
set ASFLAGS "$ASFLAGS --defsym ALIGN=3"
} else {
--
Alan Modra
Australia Development Lab, IBM