aboutsummaryrefslogtreecommitdiff
path: root/gcc/testsuite
diff options
context:
space:
mode:
authorJanis Johnson <janis187@us.ibm.com>2009-10-12 17:13:41 +0000
committerJanis Johnson <janis@gcc.gnu.org>2009-10-12 17:13:41 +0000
commit7b25ea29a8dc17c5b1dfbf25508236cfc5d83782 (patch)
treefa1c3065bde1497e563ff402ef50cc470901d19d /gcc/testsuite
parentafd2c302c6f4377ed46d809744115e67d363d997 (diff)
downloadgcc-7b25ea29a8dc17c5b1dfbf25508236cfc5d83782.zip
gcc-7b25ea29a8dc17c5b1dfbf25508236cfc5d83782.tar.gz
gcc-7b25ea29a8dc17c5b1dfbf25508236cfc5d83782.tar.bz2
re PR testsuite/41659 (FAIL: gcc.dg/lto/20090914-2 c_lto_20090914-2_0.o assemble, -O0 -fwhopr)
PR testsuite/41659 * gcc.dg/lto/20090914-2.c: Use dg-skip-if to skip test. * lib/lto.exp (lto-get-options-main): Report error for using "target" or "xfail" with dg-lto-dg. From-SVN: r152671
Diffstat (limited to 'gcc/testsuite')
-rw-r--r--gcc/testsuite/ChangeLog7
-rw-r--r--gcc/testsuite/gcc.dg/lto/20090914-2_0.c3
-rw-r--r--gcc/testsuite/lib/lto.exp10
3 files changed, 19 insertions, 1 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 07c5ef5..3979761 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,10 @@
+2009-10-12 Janis Johnson <janis187@us.ibm.com>
+
+ PR testsuite/41659
+ * gcc.dg/lto/20090914-2.c: Use dg-skip-if to skip test.
+ * lib/lto.exp (lto-get-options-main): Report error for using "target"
+ or "xfail" with dg-lto-dg.
+
2009-10-12 Stefan Dösinger <stefan@codeweavers.com>
* gcc.target/i386/ms_hook_prologue.c: New testcase.
diff --git a/gcc/testsuite/gcc.dg/lto/20090914-2_0.c b/gcc/testsuite/gcc.dg/lto/20090914-2_0.c
index f78ecf8..908af69 100644
--- a/gcc/testsuite/gcc.dg/lto/20090914-2_0.c
+++ b/gcc/testsuite/gcc.dg/lto/20090914-2_0.c
@@ -1,4 +1,5 @@
-/* { dg-lto-do run { target x86_64-*-* i?86-*-* } } */
+/* { dg-lto-do run */
+/* { dg-skip-if "x86 only" { ! { x86_64-*-* i?86-*-* } } { "*" } { "" } }
/* Doesn't work without this dummy function with -fwhopr. */
int foo(void) { }
diff --git a/gcc/testsuite/lib/lto.exp b/gcc/testsuite/lib/lto.exp
index 7f2d7ec..cccd642 100644
--- a/gcc/testsuite/lib/lto.exp
+++ b/gcc/testsuite/lib/lto.exp
@@ -191,6 +191,16 @@ proc lto-get-options-main { src } {
|| ![string compare "dg-options" $cmd] } {
warning "lto.exp does not support $cmd in primary source file"
} elseif { ![string compare "dg-lto-do" $cmd] } {
+ if { [llength $op] > 3 } {
+ set kw [lindex [lindex $op 3] 0]
+ if [string match "target" $kw] {
+ perror "$src: dg-lto-do does not support \"target\""
+ } elseif [string match "xfail" $kw] {
+ perror "$src: dg-lto-do does not support \"xfail\""
+ } else {
+ perror "$src: dg-lto-do takes a single argument"
+ }
+ }
set dgdo [lindex $op 2]
verbose "dg-lto-do command for \"$op\" is $dgdo"
if { ![string compare "assemble" $dgdo] } {