procyberian/gcc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

compat.exp (skip_list): New global variable.

Browse source 
* 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
This commit is contained in:
Eric Botcazou 2004-03-16 19:42:23 +01:00 • committed by Eric Botcazou
parent 65e8d2e0e1
commit cd9b76514e
2 changed files with 29 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
gcc/testsuite/ChangeLog
View file

@ -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,

23
gcc/testsuite/lib/compat.exp
View file

@ -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 ""