b/gcc/testsuite/lib/target-supports.exp
@@ -3473,45 +3473,13 @@ proc check_effective_target_vect_int_mult { } {
# Return 1 if the target supports vector even/odd elements
extraction, 0 otherwise.
proc check_effective_target_vect_extract_even_odd { } {
- global et_vect_extract_even_odd_saved
-
- if [info exists et_vect_extract_even_odd_saved] {
- verbose "check_effective_target_vect_extract_even_odd: using
cached result" 2
- } else {
- set et_vect_extract_even_odd_saved 0
- if { [istarget powerpc*-*-*]
- || [istarget i?86-*-*]
- || [istarget x86_64-*-*]
- || [istarget ia64-*-*]
- || [istarget spu-*-*] } {
- set et_vect_extract_even_odd_saved 1
- }
- }
-
- verbose "check_effective_target_vect_extract_even_odd: returning
$et_vect_extract_even_odd_saved" 2
- return $et_vect_extract_even_odd_saved
+ return [check_effective_target_vect_perm]
}
# Return 1 if the target supports vector interleaving, 0 otherwise.
proc check_effective_target_vect_interleave { } {
- global et_vect_interleave_saved
-
- if [info exists et_vect_interleave_saved] {
- verbose "check_effective_target_vect_interleave: using cached result" 2
- } else {
- set et_vect_interleave_saved 0
- if { [istarget powerpc*-*-*]
- || [istarget i?86-*-*]
- || [istarget x86_64-*-*]
- || [istarget ia64-*-*]
- || [istarget spu-*-*] } {
- set et_vect_interleave_saved 1
- }
- }
-
- verbose "check_effective_target_vect_interleave: returning
$et_vect_interleave_saved" 2