* 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.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@152671
138bc75d-0d04-0410-961f-
82ee72b054a4
+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.
2009-10-12 Stefan Dösinger <stefan@codeweavers.com>
* gcc.target/i386/ms_hook_prologue.c: New testcase.
-/* { 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) { }
/* Doesn't work without this dummy function with -fwhopr. */
int foo(void) { }
|| ![string compare "dg-options" $cmd] } {
warning "lto.exp does not support $cmd in primary source file"
} elseif { ![string compare "dg-lto-do" $cmd] } {
|| ![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] } {
set dgdo [lindex $op 2]
verbose "dg-lto-do command for \"$op\" is $dgdo"
if { ![string compare "assemble" $dgdo] } {