1 # Expect script
for ld selective linking tests running run_dump_test
2 # Copyright
2002 Free Software Foundation
, Inc.
4 # This file is free software
; you can redistribute it and
/or modify
5 # it under the terms of the GNU General Public License as published by
6 # the Free Software Foundation
; either version
2 of the License
, or
7 #
(at your option
) any later version.
9 # This
program is distributed in the hope that it will be useful
,
10 # but WITHOUT
ANY WARRANTY
; without even the implied warranty of
11 # MERCHANTABILITY or FITNESS
FOR A PARTICULAR PURPOSE. See the
12 # GNU General Public License
for more details.
14 # You should have received a copy of the GNU General Public License
15 # along with this
program; if not
, write to the Free Software
16 # Foundation
, Inc.
, 59 Temple Place
- Suite
330, Boston
, MA
02111-1307, USA.
18 # Test
for ELF here
, so we don
't have to qualify on ELF specifically
24 set test_list [lsort [glob -nocomplain $srcdir/$subdir/*.d]]
25 for { set i 0 } { $i < [llength $test_list] } { incr i } {
26 # We need to strip the ".d", but can leave the dirname.
27 verbose [file rootname [lindex $test_list $i]]
28 setup_xfail "alpha*-*" "arc*-*" "d30v*-*" "dlx*-*" "i370*-*" "i860*-*"
29 setup_xfail "i960*-*" "ia64*-*" "mn10200-*" "or32-*" "pj-*" "sparc64*-*"
30 run_dump_test [file rootname [lindex $test_list $i]]