* lib/compat.exp (compat-get-options): Fix for use with dg-xfail-if.
From-SVN: r91542
This commit is contained in:
parent
688977080c
commit
d7d05b864b
|
@ -1,5 +1,7 @@
|
||||||
2004-11-30 Janis Johnson <janis187@us.ibm.com>
|
2004-11-30 Janis Johnson <janis187@us.ibm.com>
|
||||||
|
|
||||||
|
* lib/compat.exp (compat-get-options): Fix for use with dg-xfail-if.
|
||||||
|
|
||||||
* lib/target-supports.exp (is-effective-target): Simplify.
|
* lib/target-supports.exp (is-effective-target): Simplify.
|
||||||
|
|
||||||
* lib/target-supports.exp (check_effective_target_vect_long):
|
* lib/target-supports.exp (check_effective_target_vect_long):
|
||||||
|
|
|
@ -200,6 +200,9 @@ proc compat-get-options { src } {
|
||||||
global compiler_conditional_xfail_data
|
global compiler_conditional_xfail_data
|
||||||
set compiler_conditional_xfail_data ""
|
set compiler_conditional_xfail_data ""
|
||||||
|
|
||||||
|
# dg-xfail-if needs access to dg-do-what.
|
||||||
|
upvar dg-do-what dg-do-what
|
||||||
|
|
||||||
set tmp [dg-get-options $src]
|
set tmp [dg-get-options $src]
|
||||||
foreach op $tmp {
|
foreach op $tmp {
|
||||||
set cmd [lindex $op 0]
|
set cmd [lindex $op 0]
|
||||||
|
|
Loading…
Reference in New Issue