* ld-elfcomm/elfcomm.exp (dump_common1): Use $READELF, not plain
readelf as found using default path.
This commit is contained in:
parent
9f2b53d784
commit
a42ec05b09
|
@ -1,3 +1,8 @@
|
||||||
|
2003-06-18 Hans-Peter Nilsson <hp@axis.com>
|
||||||
|
|
||||||
|
* ld-elfcomm/elfcomm.exp (dump_common1): Use $READELF, not plain
|
||||||
|
readelf as found using default path.
|
||||||
|
|
||||||
2003-06-18 Alan Modra <amodra@bigpond.net.au>
|
2003-06-18 Alan Modra <amodra@bigpond.net.au>
|
||||||
|
|
||||||
* lib/ld-lib.exp (default_ld_simple_link): Trim ld parms before
|
* lib/ld-lib.exp (default_ld_simple_link): Trim ld parms before
|
||||||
|
|
|
@ -41,9 +41,10 @@ if { [which $CC] == 0 } {
|
||||||
|
|
||||||
proc dump_common1 { testname } {
|
proc dump_common1 { testname } {
|
||||||
global exec_output
|
global exec_output
|
||||||
|
global READELF
|
||||||
|
|
||||||
send_log "readelf -s tmpdir/common1.o | grep foo\n"
|
send_log "$READELF -s tmpdir/common1.o | grep foo\n"
|
||||||
catch "exec readelf -s tmpdir/common1.o | grep foo" exec_output
|
catch "exec $READELF -s tmpdir/common1.o | grep foo" exec_output
|
||||||
if { ![regexp "(\[ \]*)(\[0-9\]+):(\[ \]*)(\[0\]*)80(\[ \]+)4(\[ \]+)OBJECT(\[ \]+)GLOBAL(\[ \]+)DEFAULT(\[ \]+)COM(\[ \]+)_?foo2" $exec_output]
|
if { ![regexp "(\[ \]*)(\[0-9\]+):(\[ \]*)(\[0\]*)80(\[ \]+)4(\[ \]+)OBJECT(\[ \]+)GLOBAL(\[ \]+)DEFAULT(\[ \]+)COM(\[ \]+)_?foo2" $exec_output]
|
||||||
|| ![regexp "(\[ \]*)(\[0-9\]+):(\[ \]*)(\[0-9\]+)(\[ \]+)21(\[ \]+)OBJECT(\[ \]+)GLOBAL(\[ \]+)DEFAULT(\[ \]+)(\[0-9\]+)(\[ \]+)_?foo1" $exec_output] } {
|
|| ![regexp "(\[ \]*)(\[0-9\]+):(\[ \]*)(\[0-9\]+)(\[ \]+)21(\[ \]+)OBJECT(\[ \]+)GLOBAL(\[ \]+)DEFAULT(\[ \]+)(\[0-9\]+)(\[ \]+)_?foo1" $exec_output] } {
|
||||||
send_log "$exec_output\n"
|
send_log "$exec_output\n"
|
||||||
|
|
Loading…
Reference in New Issue