gcc-dg.exp (dg_runtest_extra_prunes): New variable to define extra prune rules that will be applied to all tests in a...
2012-09-19 Terry Guo <terry.guo@arm.com> * lib/gcc-dg.exp (dg_runtest_extra_prunes): New variable to define extra prune rules that will be applied to all tests in a .exp file. (gcc-dg-prune): Use rules defined by the above variable. * gcc.target/arm/arm.exp (dg_runtest_extra_prunes): Skip all the harmless warnings on architecture switch conflict. From-SVN: r191460
This commit is contained in:
parent
9425c00b8e
commit
06e28db05e
@ -1,3 +1,11 @@
|
||||
2012-09-19 Terry Guo <terry.guo@arm.com>
|
||||
|
||||
* lib/gcc-dg.exp (dg_runtest_extra_prunes): New variable to define
|
||||
extra prune rules that will be applied to all tests in a .exp file.
|
||||
(gcc-dg-prune): Use rules defined by the above variable.
|
||||
* gcc.target/arm/arm.exp (dg_runtest_extra_prunes): Skip all the
|
||||
harmless warnings on architecture switch conflict.
|
||||
|
||||
2012-09-19 Hans-Peter Nilsson <hp@axis.com>
|
||||
|
||||
* g++.dg/debug/dwarf2/nested-3.C: Match a sequence
|
||||
|
@ -30,6 +30,11 @@ if ![info exists DEFAULT_CFLAGS] then {
|
||||
set DEFAULT_CFLAGS " -ansi -pedantic-errors"
|
||||
}
|
||||
|
||||
# This variable should only apply to tests called in this exp file.
|
||||
global dg_runtest_extra_prunes
|
||||
set dg_runtest_extra_prunes ""
|
||||
lappend dg_runtest_extra_prunes "warning: switch -m(cpu|arch)=.* conflicts with -m(cpu|arch)=.* switch"
|
||||
|
||||
# Initialize `dg'.
|
||||
dg-init
|
||||
|
||||
@ -38,4 +43,5 @@ dg-runtest [lsort [glob -nocomplain $srcdir/$subdir/*.\[cCS\]]] \
|
||||
"" $DEFAULT_CFLAGS
|
||||
|
||||
# All done.
|
||||
set dg_runtest_extra_prunes ""
|
||||
dg-finish
|
||||
|
@ -212,9 +212,13 @@ proc gcc-dg-test { prog do_what extra_tool_flags } {
|
||||
proc gcc-dg-prune { system text } {
|
||||
global additional_prunes
|
||||
|
||||
# Extra prune rules that will apply to tests defined in a .exp file.
|
||||
# Always remember to clear it in .exp file after executed all tests.
|
||||
global dg_runtest_extra_prunes
|
||||
|
||||
set text [prune_gcc_output $text]
|
||||
|
||||
foreach p $additional_prunes {
|
||||
foreach p "$additional_prunes $dg_runtest_extra_prunes" {
|
||||
if { [string length $p] > 0 } {
|
||||
# Following regexp matches a complete line containing $p.
|
||||
regsub -all "(^|\n)\[^\n\]*$p\[^\n\]*" $text "" text
|
||||
@ -803,3 +807,4 @@ proc gdb-exists { args } {
|
||||
}
|
||||
|
||||
set additional_prunes ""
|
||||
set dg_runtest_extra_prunes ""
|
||||
|
Loading…
Reference in New Issue
Block a user