daily update
[deliverable/binutils-gdb.git] / ld / testsuite / ld-checks / checks.exp
1 # Expect script for LD section checks tests
2 # Copyright 1999, 2001 Free Software Foundation, Inc.
3 #
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.
8 #
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.
13 #
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.
17 #
18 # Written by Nick Clifton (nickc@cygnus.com)
19
20 proc section_check {} {
21 global ld_flags
22 global as
23 global ld
24 global srcdir
25 global subdir
26
27 # The usage of .lcomm in asm.s is incompatible with ia64 and ppc coff.
28 if { [istarget ia64-*-*]
29 || [istarget powerpc*-*-aix*] || [istarget powerpc-*-beos*]
30 || [istarget rs6000-*-*] } {
31 return
32 }
33 set test "check sections 1"
34
35 set ldflags "--check-sections"
36
37 if { ![ld_assemble $as $srcdir/$subdir/asm.s tmpdir/asm.o]} {
38 unresolved $test
39 return
40 }
41
42 if ![ld_simple_link $ld tmpdir/asm.x "$ldflags tmpdir/asm.o"] {
43 fail $test
44 } else {
45 pass $test
46 }
47
48 set test "check sections 2"
49
50 # Change the linker flags so that our "buggy" linker
51 # script is used.
52 set ldflags "--check-sections -T $srcdir/$subdir/script -e foo"
53
54 # Perform the equivalent of invoking ld_simple_link
55 # except that we need to massage the output futher.
56
57 catch "exec $ld -o tmpdir/asm.x $ldflags tmpdir/asm.o" exec_output
58 set exec_output [prune_warnings $exec_output]
59
60 # Make sure that we got some output from the linker
61 if [string match "" $exec_output] then {
62 fail $test
63 }
64
65 # Now remove our expected error message
66 regsub -all ".*: section .data .* overlaps section .text .*" $exec_output "" exec_output
67
68 # And check to see if anything else, (unexpected) was left
69 if [string match "" $exec_output] then {
70 pass $test
71 } else {
72 verbose -log "Unexpected linker message(s): $exec_output"
73 fail $test
74 }
75 }
76
77 section_check
78
79
This page took 0.033151 seconds and 4 git commands to generate.