compat.exp (skip_list): New global variable.

	* lib/compat.exp (skip_list): New global variable.
	Use it to hold the user defined COMPAT_SKIPS list if any.
	(compat-obj): Add the members of skip_list to optall.

From-SVN: r79540

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index a7d2d49c85e962e54966b83b602ac89d5e7e9d8d..847bf1d537a6450dc5875947f028cd12ea54c29f 100644 (file)
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,9 @@
+2004-03-16  Eric Botcazou  <ebotcazou@libertysurf.fr>
+
+       * lib/compat.exp (skip_list): New global variable.
+       Use it to hold the user defined COMPAT_SKIPS list if any.
+       (compat-obj): Add the members of skip_list to optall.
+
 2004-03-16  Eric Botcazou  <ebotcazou@libertysurf.fr>
 
        * gcc.dg/compat/union-by-value-1_main.c,

diff --git a/gcc/testsuite/lib/compat.exp b/gcc/testsuite/lib/compat.exp
index bf40c6eee39820a24a31ca2b7eda0fbb75fcbd7a..0a7cfec0b0ead946d5824c421f230abb1d19cae2 100644 (file)
--- a/gcc/testsuite/lib/compat.exp
+++ b/gcc/testsuite/lib/compat.exp
@@ -49,6 +49,21 @@ if ![info exists COMPAT_OPTIONS] {
 
 set option_list $COMPAT_OPTIONS
 
+# Subsets of tests can be selectively disabled by members of this list:
+#  - ATTRIBUTE: disable all tests using the __attribute__ extension,
+#  - COMPLEX_INT: disable all tests using the complex integral types extension,
+#  - VA: disable all tests using the variable number of arguments feature,
+#  - ZERO_ARRAY: disable all tests using the zero-sized arrays extension.
+# The default skip lists can be overriden by
+# COMPAT_SKIPS="[list {skip_1}...{skip_n}]"
+# where skip_i are skip identifiers.  You can put this in the environment
+# before site.exp is written or add it to site.exp directly.
+if ![info exists COMPAT_SKIPS] {
+    set COMPAT_SKIPS [list {}]
+}
+
+set skip_list $COMPAT_SKIPS
+
 load_lib dg.exp
 load_lib gcc-dg.exp
 
@@ -66,6 +81,14 @@ proc compat-obj { source dest optall optfile optstr xfaildata } {
     global testcase
     global tool
     global compiler_conditional_xfail_data
+    global skip_list
+
+    # Add the skip specifiers.
+    foreach skip $skip_list {
+       if { ![string match $skip ""] } {
+           lappend optall "-DSKIP_$skip"
+       }
+    }
 
     # Set up the options for compiling this file.
     set options ""