lto.exp (lto-get-options-main): Support optional target selector for dg-suppress-ld-options.

gcc/testsuite:
	* lib/lto.exp (lto-get-options-main): Support optional target
	selector for dg-suppress-ld-options.

	gcc:
	* doc/sourcebuild.texi (LTO Testing, dg-suppress-ld-options):
	Document optional target selector.

From-SVN: r166602
This commit is contained in:
Rainer Orth 2010-11-11 14:08:47 +00:00 committed by Rainer Orth
parent d19e0f01a1
commit 86de8875db
4 changed files with 22 additions and 4 deletions

View File

@ -1,3 +1,8 @@
2010-11-11 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
* doc/sourcebuild.texi (LTO Testing, dg-suppress-ld-options):
Document optional target selector.
2010-11-11 Dave Korn <dave.korn.cygwin@gmail.com>
* lto-streamer-out.c (write_symbol): Use int_size_in_bytes rather than

View File

@ -2302,7 +2302,7 @@ each of these sets of options.
@item @{ dg-extra-ld-options @var{options} [@{ target @var{selector} @}]@}
This directive adds @var{options} to the linker options used.
@item @{ dg-suppress-ld-options @var{options} @}
@item @{ dg-suppress-ld-options @var{options} [@{ target @var{selector} @}]@}
This directive removes @var{options} from the set of linker options used.
@end table

View File

@ -1,3 +1,8 @@
2010-11-11 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
* lib/lto.exp (lto-get-options-main): Support optional target
selector for dg-suppress-ld-options.
2010-11-11 Martin Jambor <mjambor@suse.cz>
PR tree-optimization/46383

View File

@ -309,9 +309,17 @@ proc lto-get-options-main { src } {
}
}
} elseif { ![string compare "dg-suppress-ld-options" $cmd] } {
set dg-suppress-ld-options [lindex $op 2]
verbose \
"dg-suppress-ld-options for main is ${dg-suppress-ld-options}"
if { [llength $op] > 4 } {
error "[lindex $op 0]: too many arguments"
} else {
if { [llength $op] == 3
|| ([llength $op] > 3
&& [dg-process-target [lindex $op 3]] == "S") } {
set dg-suppress-ld-options [lindex $op 2]
verbose \
"dg-suppress-ld-options for main is ${dg-suppress-ld-options}"
}
}
} elseif { ![string compare "dg-final" $cmd] } {
if { [llength $op] > 3 } {
error "[lindex $op 0]: too many arguments"