Committed, ld-elfcomm/elfcomm.exp: Use $READELF, not readelf.

[Hans-Peter Nilsson]

Found running ld tests with cross gcc+binutils configured for
cris-axis-linux-gnu on a system with an old readelf.  Committed as
obvious.

	* ld-elfcomm/elfcomm.exp (dump_common1): Use $READELF, not plain
	readelf as found using default path.

Index: ld-elfcomm/elfcomm.exp
===================================================================
RCS file: /cvs/src/src/ld/testsuite/ld-elfcomm/elfcomm.exp,v
retrieving revision 1.6
diff -p -c -r1.6 elfcomm.exp
*** ld-elfcomm/elfcomm.exp	3 Jun 2003 15:28:36 -0000	1.6
--- ld-elfcomm/elfcomm.exp	18 Jun 2003 01:03:41 -0000
*************** if { [which $CC] == 0 } {
*** 41,49 ****
  
  proc dump_common1 { testname } {
      global exec_output
  
!     send_log "readelf -s tmpdir/common1.o | grep foo\n"
!     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]
   	 || ![regexp "(\[ 	\]*)(\[0-9\]+):(\[ 	\]*)(\[0-9\]+)(\[ 	\]+)21(\[ 	\]+)OBJECT(\[ 	\]+)GLOBAL(\[ 	\]+)DEFAULT(\[ 	\]+)(\[0-9\]+)(\[ 	\]+)_?foo1" $exec_output] } {
  	send_log "$exec_output\n"
--- 41,50 ----
  
  proc dump_common1 { testname } {
      global exec_output
+     global READELF
  
!     send_log "$READELF -s tmpdir/common1.o | grep foo\n"
!     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]
   	 || ![regexp "(\[ 	\]*)(\[0-9\]+):(\[ 	\]*)(\[0-9\]+)(\[ 	\]+)21(\[ 	\]+)OBJECT(\[ 	\]+)GLOBAL(\[ 	\]+)DEFAULT(\[ 	\]+)(\[0-9\]+)(\[ 	\]+)_?foo1" $exec_output] } {
  	send_log "$exec_output\n"

brgds, H-P