提交: 33c5e3a91d4d2265fc4c8a44210952616680b10b - binutils_os216 (git)

GNU Binutils with patches for OS216

Commit MetaInfo

• 修訂: 33c5e3a91d4d2265fc4c8a44210952616680b10b (tree)
• 時間: 2005-10-20 03:33:25
• 作者: H.J. Lu <hjl.tools@gmai...>
• Commiter: H.J. Lu

Log Message

2005-10-19 H.J. Lu <[e-mail]>

* ld-ia64/ia64.exp: Check link order for ld -r.

Change Summary

• modified: ld/testsuite/ChangeLog
• modified: ld/testsuite/ld-ia64/ia64.exp

差異

--- a/ld/testsuite/ChangeLog
+++ b/ld/testsuite/ChangeLog
@@ -1,3 +1,7 @@
[phone]  H.J. Lu  <[e-mail]>
+
+	* ld-ia64/ia64.exp: Check link order for ld -r.
+
 2005-10-18  Alan Modra  <[e-mail]>
 
 	* ld-scripts/crossref.exp: Add -mcall-aixdesc to CFLAGS for

--- a/ld/testsuite/ld-ia64/ia64.exp
+++ b/ld/testsuite/ld-ia64/ia64.exp
@@ -52,3 +52,49 @@ set ia64tests {
 }
 
 run_ld_link_tests $ia64tests
+
+# Check link order
+proc link_order {} {
+    global AS
+    global LD
+    global READELF
+    global srcdir
+    global subdir
+
+    set testname "link order"
+    if ![ld_assemble $AS $srcdir/../../binutils/testsuite/binutils-all/link-order.s tmpdir/link-order.o] {
+ 	unresolved $testname
+	return
+    }
+
+    if ![ld_simple_link $LD tmpdir/link-order.ro "-r tmpdir/link-order.o"] {
+ 	unresolved $testname
+	return
+    }
+
+    verbose -log "$READELF -t --wide tmpdir/link-order.o | grep IA_64_UNWIND > tmpdir/link-order.o.out"
+    catch "exec $READELF -t --wide tmpdir/link-order.o | grep IA_64_UNWIND > tmpdir/link-order.o.out" exec_output
+    set exec_output [prune_warnings $exec_output]
+    if ![string match "" $exec_output] then {
+ 	unresolved $testname
+	return
+    }
+
+    verbose -log "$READELF -t --wide tmpdir/link-order.ro | grep IA_64_UNWIND > tmpdir/link-order.ro.out"
+    catch "exec $READELF -t --wide tmpdir/link-order.ro | grep IA_64_UNWIND > tmpdir/link-order.ro.out" exec_output
+    set exec_output [prune_warnings $exec_output]
+    if ![string match "" $exec_output] then {
+ 	unresolved $testname
+	return
+    }
+
+    verbose -log "cmp tmpdir/link-order.o.out tmpdir/link-order.ro.out"
+    catch "exec cmp tmpdir/link-order.o.out tmpdir/link-order.ro.out" exec_output
+    if ![string match "" $exec_output] then {
+ 	fail $testname
+    } else {
+ 	pass $testname
+    }
+}
+
+link_order