aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJanis Johnson <janis187@us.ibm.com>2004-11-30 21:30:27 +0000
committerJanis Johnson <janis@gcc.gnu.org>2004-11-30 21:30:27 +0000
commit688977080c69ae454fd568d6af42c57679ec885a (patch)
treeba03cf0766cdccfbb1fef78dd95eb97c89326acb
parentf470b1e5b754215f807cdab7267a374dc0421be1 (diff)
downloadgcc-688977080c69ae454fd568d6af42c57679ec885a.zip
gcc-688977080c69ae454fd568d6af42c57679ec885a.tar.gz
gcc-688977080c69ae454fd568d6af42c57679ec885a.tar.bz2
* lib/target-supports.exp (is-effective-target): Simplify.
From-SVN: r91541
-rw-r--r--gcc/testsuite/ChangeLog2
-rw-r--r--gcc/testsuite/lib/target-supports.exp20
2 files changed, 11 insertions, 11 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index f642e1e..d2ca890 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,5 +1,7 @@
2004-11-30 Janis Johnson <janis187@us.ibm.com>
+ * lib/target-supports.exp (is-effective-target): Simplify.
+
* lib/target-supports.exp (check_effective_target_vect_long):
Fix for powerpc64-*-*.
diff --git a/gcc/testsuite/lib/target-supports.exp b/gcc/testsuite/lib/target-supports.exp
index ed1394c..0e122e0 100644
--- a/gcc/testsuite/lib/target-supports.exp
+++ b/gcc/testsuite/lib/target-supports.exp
@@ -525,17 +525,15 @@ proc check_effective_target_vect_double { } {
proc is-effective-target { arg } {
set selected 0
- switch $arg {
- "ilp32" { set selected [check_effective_target_ilp32] }
- "lp64" { set selected [check_effective_target_lp64] }
- "vmx_hw" { set selected [check_vmx_hw_available] }
- "named_sections" { set selected [check_named_sections_available] }
- "gc_sections" { set selected [check_gc_sections_available] }
- "vect_int" { set selected [check_effective_target_vect_int] }
- "vect_long" { set selected [check_effective_target_vect_long] }
- "vect_float" { set selected [check_effective_target_vect_float] }
- "vect_double" { set selected [check_effective_target_vect_double] }
- default { error "unknown effective target selector `$arg'" }
+ if { [info procs check_effective_target_${arg}] != [list] } {
+ set selected [check_effective_target_${arg}]
+ } else {
+ switch $arg {
+ "vmx_hw" { set selected [check_vmx_hw_available] }
+ "named_sections" { set selected [check_named_sections_available] }
+ "gc_sections" { set selected [check_gc_sections_available] }
+ default { error "unknown effective target keyword `$arg'" }
+ }
}
verbose "is-effective-target: $arg $selected" 2
return $selected