* lib/compat.exp (compat-get-options): Fix for use with dg-xfail-if.

[pf3gnuchains/gcc-fork.git] / gcc / testsuite / lib / compat.exp

diff --git a/gcc/testsuite/lib/compat.exp b/gcc/testsuite/lib/compat.exp
index 9bf71d7..79f6f15 100644 (file)
--- a/gcc/testsuite/lib/compat.exp
+++ b/gcc/testsuite/lib/compat.exp
@@ -200,6 +200,9 @@ proc compat-get-options { src } {
     global 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]
     foreach op $tmp {
        set cmd [lindex $op 0]