aboutsummaryrefslogtreecommitdiff
path: root/gas/testsuite/lib/gas-defs.exp
diff options
context:
space:
mode:
Diffstat (limited to 'gas/testsuite/lib/gas-defs.exp')
-rw-r--r--gas/testsuite/lib/gas-defs.exp11
1 files changed, 7 insertions, 4 deletions
diff --git a/gas/testsuite/lib/gas-defs.exp b/gas/testsuite/lib/gas-defs.exp
index 9cb117f..7f98c85 100644
--- a/gas/testsuite/lib/gas-defs.exp
+++ b/gas/testsuite/lib/gas-defs.exp
@@ -1,4 +1,4 @@
-# Copyright (C) 1993, 1994, 1997, 1998, 1999, 2000 Free Software
+# Copyright (C) 1993, 1994, 1997, 1998, 1999, 2000, 2001 Free Software
# Foundation, Inc.
# This program is free software; you can redistribute it and/or modify
@@ -242,8 +242,8 @@ proc gas_init { args } {
proc run_dump_test { name } {
global subdir srcdir
- global OBJDUMP NM AS OBJCOPY
- global OBJDUMPFLAGS NMFLAGS ASFLAGS OBJCOPYFLAGS
+ global OBJDUMP NM AS OBJCOPY READELF
+ global OBJDUMPFLAGS NMFLAGS ASFLAGS OBJCOPYFLAGS READELFFLAGS
global host_triplet
if [string match "*/*" $name] {
@@ -262,6 +262,7 @@ proc run_dump_test { name } {
set opts(objdump) {}
set opts(nm) {}
set opts(objcopy) {}
+ set opts(readelf) {}
set opts(name) {}
set opts(PROG) {}
set opts(source) {}
@@ -290,6 +291,8 @@ proc run_dump_test { name } {
{ set program nm }
objcopy
{ set program objcopy }
+ readelf
+ { set program readelf }
default
{ perror "unrecognized program option $opts(PROG) in $file.d"
unresolved $subdir/$name
@@ -298,7 +301,7 @@ proc run_dump_test { name } {
} else {
# Guess which program to run, by seeing which option was specified.
set program ""
- foreach p {objdump objcopy nm} {
+ foreach p {objdump objcopy nm readelf} {
if {$opts($p) != ""} {
if {$program != ""} {
perror "ambiguous dump program in $file.d"