Extend PE matching regexp in PR 19457 test to match cygwin and mingw targets.

[deliverable/binutils-gdb.git] / ld / testsuite / ld-scripts / script.exp

diff --git a/ld/testsuite/ld-scripts/script.exp b/ld/testsuite/ld-scripts/script.exp
index 03d5d4e0a64ba4a66f58ac43d4b6415126f01af0..b178cb3d2ea3d3cebef1032e7616b18126536bbd 100644 (file)
--- a/ld/testsuite/ld-scripts/script.exp
+++ b/ld/testsuite/ld-scripts/script.exp
@@ -134,6 +134,35 @@ proc extract_symbol_test { testfile testname } {
            # but absolute symbol types are expected.
            regsub -all " \[TD\] " $syms_massaged " A " syms_massaged
        }
+       ^mips-*-* {
+           # This test cannot proceed any further for MIPS targets.
+           # The extract_syms operation produces a binary with a zero
+           # length .reginfo section, which is illegal under the MIPS
+           # ABI.  Since producing such sections is part of the expected
+           # behaviour of --extract-symbols, no further testing can be
+           # performed.  Fortunately this should not matter as extracting
+           # symbols is only needed for VxWorks support.
+           pass $testname
+           return
+       }
+       [a-z]*-*-pe$ {
+           # Fails for PE based targets because the extracted section
+           # relative symbols (eg tred or .text) all become undefined
+           # when the sections are blown away by --extract-symbol.  Again
+           # this should not matter as --extract-symbol is only used by
+           # VxWorks.
+           pass $testname
+           return
+       }
+       # More PE variations...
+       [a-z]*-*-mingw* {
+           pass $testname
+           return
+       }
+       [a-z]*-*-cygwin$ {
+           pass $testname
+           return
+       }
     }
 
     set extract_syms [run_host_cmd $nm $copyfile]
@@ -142,6 +171,7 @@ proc extract_symbol_test { testfile testname } {
        return
     }
 
+    # Check that the stripped section contains no code or data.
     set exec_output [run_host_cmd $size $copyfile]
     if ![regexp ".* 0\[         \]+0\[  \]+0\[  \]+0\[  \]+0\[  \]+.*" $exec_output] {
        fail $testname