mirror of git://gcc.gnu.org/git/gcc.git
dump-noaddr.x (dump_compare): Use --dumpbase to put dump files in a subdirectory.
* gcc.c-torture/unsorted/dump-noaddr.x (dump_compare): Use --dumpbase to put dump files in a subdirectory. * gcc/testsuite/lib/gcc-dg.exp (cleanup-saved-temps): Also remove ".o" temporary files. From-SVN: r148768
This commit is contained in:
parent
9b63f28250
commit
ee372c4b96
|
|
@ -1,3 +1,10 @@
|
||||||
|
2009-06-21 Uros Bizjak <ubizjak@gmail.com>
|
||||||
|
|
||||||
|
* gcc.c-torture/unsorted/dump-noaddr.x (dump_compare): Use --dumpbase
|
||||||
|
to put dump files in a subdirectory.
|
||||||
|
* gcc/testsuite/lib/gcc-dg.exp (cleanup-saved-temps): Also remove
|
||||||
|
".o" temporary files.
|
||||||
|
|
||||||
2009-06-21 Janus Weil <janus@gcc.gnu.org>
|
2009-06-21 Janus Weil <janus@gcc.gnu.org>
|
||||||
|
|
||||||
PR fortran/39850
|
PR fortran/39850
|
||||||
|
|
|
||||||
|
|
@ -3,27 +3,18 @@ proc dump_compare { src options } {
|
||||||
global srcdir subdir
|
global srcdir subdir
|
||||||
global tmpdir
|
global tmpdir
|
||||||
|
|
||||||
exec echo $src
|
|
||||||
|
|
||||||
global torture_with_loops
|
global torture_with_loops
|
||||||
set option_list $torture_with_loops
|
set option_list $torture_with_loops
|
||||||
set dumpbase dump-noaddr
|
set dumpbase dump-noaddr.c
|
||||||
# ??? passing -dumpbase to the gcc driver doesn't work, since it will pass
|
|
||||||
# another -dumpbase option to override it.
|
|
||||||
# loop through all the options
|
# loop through all the options
|
||||||
foreach option $option_list {
|
foreach option $option_list {
|
||||||
# c-torture-compile ${dumpbase}_1 "$option $options -DMASK=1 -x c -da -fdump-tree-all"
|
|
||||||
# c-torture-compile ${dumpbase}_2 "$option $options -DMASK=2 -x c -da -fdump-tree-all"
|
|
||||||
# c-torture-compile ${dumpbase}_3 "$option $options -DMASK=3 -x c -da -fdump-tree-all"
|
|
||||||
file delete -force dump1
|
file delete -force dump1
|
||||||
file delete -force dump2
|
|
||||||
file mkdir dump1
|
file mkdir dump1
|
||||||
|
c-torture-compile $src "$option $options --dumpbase=dump1/$dumpbase -DMASK=1 -x c --param ggc-min-heapsize=1 -fdump-rtl-all -fdump-tree-all -fdump-noaddr"
|
||||||
|
file delete -force dump2
|
||||||
file mkdir dump2
|
file mkdir dump2
|
||||||
cd dump1
|
c-torture-compile $src "$option $options --dumpbase=dump2/$dumpbase -DMASK=2 -x c -fdump-rtl-all -fdump-tree-all -fdump-noaddr"
|
||||||
c-torture-compile $src "$option $options -DMASK=1 -x c --param ggc-min-heapsize=1 -da -fdump-tree-all -fdump-noaddr"
|
|
||||||
cd ../dump2
|
|
||||||
c-torture-compile $src "$option $options -DMASK=2 -x c -da -fdump-tree-all -fdump-noaddr"
|
|
||||||
cd ..
|
|
||||||
foreach dump1 [lsort [glob -nocomplain dump1/*]] {
|
foreach dump1 [lsort [glob -nocomplain dump1/*]] {
|
||||||
regsub dump1/ $dump1 dump2/ dump2
|
regsub dump1/ $dump1 dump2/ dump2
|
||||||
set dumptail "gcc.c-torture/unsorted/[file tail $dump1]"
|
set dumptail "gcc.c-torture/unsorted/[file tail $dump1]"
|
||||||
|
|
|
||||||
|
|
@ -460,7 +460,7 @@ proc cleanup-dump { suffix } {
|
||||||
|
|
||||||
# Remove files kept by --save-temps for the current test.
|
# Remove files kept by --save-temps for the current test.
|
||||||
#
|
#
|
||||||
# Currently this is only .i, .ii and .s files, but more can be added
|
# Currently this is only .i, .ii, .s and .o files, but more can be added
|
||||||
# if there are tests generating them.
|
# if there are tests generating them.
|
||||||
# ARGS is a list of suffixes to NOT delete.
|
# ARGS is a list of suffixes to NOT delete.
|
||||||
proc cleanup-saved-temps { args } {
|
proc cleanup-saved-temps { args } {
|
||||||
|
|
@ -468,7 +468,7 @@ proc cleanup-saved-temps { args } {
|
||||||
set suffixes {}
|
set suffixes {}
|
||||||
|
|
||||||
# add the to-be-kept suffixes
|
# add the to-be-kept suffixes
|
||||||
foreach suffix {".ii" ".i" ".s"} {
|
foreach suffix {".ii" ".i" ".s" ".o"} {
|
||||||
if {[lsearch $args $suffix] < 0} {
|
if {[lsearch $args $suffix] < 0} {
|
||||||
lappend suffixes $suffix
|
lappend suffixes $suffix
|
||||||
}
|
}
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue