lto.exp (lto-get-options-main): Support optional target selector for dg-suppress...
authorRainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
Thu, 11 Nov 2010 14:08:47 +0000 (14:08 +0000)
committerRainer Orth <ro@gcc.gnu.org>
Thu, 11 Nov 2010 14:08:47 +0000 (14:08 +0000)
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

gcc/ChangeLog
gcc/doc/sourcebuild.texi
gcc/testsuite/ChangeLog
gcc/testsuite/lib/lto.exp

index 78e48c4..1d686e9 100644 (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
index cdf63e0..239536c 100644 (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
 
index 95c548c..26b24d3 100644 (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
index 57c7a2e..36bc72a 100644 (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"