From 8a332c1196c59f6f6ec54368549bd20a37cbddcb Mon Sep 17 00:00:00 2001
From: Uros Bizjak <ubizjak@gmail.com>
Date: Wed, 8 Oct 2008 23:15:36 +0200
Subject: [PATCH] ggc-pr37574.c: Cleanup "vect" tree dump.
* gcc.dg/vect/ggc-pr37574.c: Cleanup "vect" tree dump.
* gfortran.dg/intrinsic_optional_char_arg_1.f90: Cleanup
"original" tree dump.
* lib/gfortran-dg.exp (gfortran-dg-debug-runtest): Remove build
file trivial.S.
From-SVN: r140989
---
gcc/testsuite/ChangeLog | 9 +++++++++
gcc/testsuite/gcc.dg/vect/ggc-pr37574.c | 2 ++
.../gfortran.dg/intrinsic_optional_char_arg_1.f90 | 1 +
gcc/testsuite/lib/gfortran-dg.exp | 1 +
4 files changed, 13 insertions(+)
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 3991d9681c9a..50b94482242b 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,12 @@
+2008-10-08 Uros Bizjak <ubizjak@gmail.com>
+
+ * gcc.dg/vect/ggc-pr37574.c: Cleanup "vect" tree dump.
+ * gfortran.dg/intrinsic_optional_char_arg_1.f90: Cleanup
+ "original" tree dump.
+
+ * lib/gfortran-dg.exp (gfortran-dg-debug-runtest): Remove build
+ file trivial.S.
+
2008-10-08 Adam Nemet <anemet@caviumnetworks.com>
* gcc.target/mips/octeon-exts-2.c: Compile it with -meb.
diff --git a/gcc/testsuite/gcc.dg/vect/ggc-pr37574.c b/gcc/testsuite/gcc.dg/vect/ggc-pr37574.c
index b95bfafe1fa9..176aa7eafc0b 100644
--- a/gcc/testsuite/gcc.dg/vect/ggc-pr37574.c
+++ b/gcc/testsuite/gcc.dg/vect/ggc-pr37574.c
@@ -18,3 +18,5 @@ int main (void) {
return -1;
return 0;
}
+
+/* { dg-final { cleanup-tree-dump "vect" } } */
diff --git a/gcc/testsuite/gfortran.dg/intrinsic_optional_char_arg_1.f90 b/gcc/testsuite/gfortran.dg/intrinsic_optional_char_arg_1.f90
index 5352ee4bf260..3215f43fa407 100644
--- a/gcc/testsuite/gfortran.dg/intrinsic_optional_char_arg_1.f90
+++ b/gcc/testsuite/gfortran.dg/intrinsic_optional_char_arg_1.f90
@@ -29,3 +29,4 @@ END PROGRAM main
! { dg-final { scan-tree-dump "_eoshift\[0-9_\]+char \\(\[&a-zA-Z0-9._, \]+, 1, 0\\)" "original" } }
! { dg-final { scan-tree-dump "_reshape\[0-9_\]+char \\(\[&a-zA-Z0-9._, \]+, 1, 0\\)" "original" } }
! { dg-final { scan-tree-dump "_pack\[0-9_\]+char \\(\[&a-zA-Z0-9._, \]+, 1, 0\\)" "original" } }
+! { dg-final { cleanup-tree-dump "original" } }
diff --git a/gcc/testsuite/lib/gfortran-dg.exp b/gcc/testsuite/lib/gfortran-dg.exp
index d7b1f2d78249..55d6d400c401 100644
--- a/gcc/testsuite/lib/gfortran-dg.exp
+++ b/gcc/testsuite/lib/gfortran-dg.exp
@@ -133,6 +133,7 @@ proc gfortran-dg-debug-runtest { target_compile trivial opt_opts testcases } {
} {
continue
}
+ remove-build-file "trivial.S"
foreach level {1 "" 3} {
lappend DEBUG_TORTURE_OPTIONS [list "${type}${level}"]
foreach opt $opt_opts {
--
GitLab