(test4): Test for presence of foo__1B, not absence

This commit is contained in:
Alan Modra 2000-04-12 12:47:25 +00:00
parent 3017ff0eca
commit e76e4c9104
2 changed files with 29 additions and 9 deletions

View File

@ -1,7 +1,8 @@
2000-04-12 Alan Modra <alan@linuxcare.com.au>
* ld-selective/selective.exp (test4): Delete incorrect foo__1B
test. White space changes throughout file.
* ld-selective/selective.exp (test4): Test for presence of
foo__1B, not absence. Also check for foo__1A and _start.
White space changes throughout file.
2000-03-13 Nick Clifton <nickc@cygnus.com>

View File

@ -86,7 +86,7 @@ if ![ld_simple_link $ld tmpdir/2.x "$ldflags tmpdir/2.o"] {
} else {
if {[info exists nm_output(foo)] } {
send_log "foo == $nm_output(foo)\n"
verbose "foo== $nm_output(foo)"
verbose "foo == $nm_output(foo)"
fail $test2
} else {
pass $test2
@ -112,7 +112,7 @@ if ![ld_simple_link $ld tmpdir/2.x "$ldflags -u foo tmpdir/2.o"] {
} else {
if {$nm_output(foo) == 0} {
send_log "foo == $nm_output(foo)\n"
verbose "foo== $nm_output(foo)"
verbose "foo == $nm_output(foo)"
fail $test3
} else {
pass $test3
@ -136,12 +136,31 @@ if ![ld_simple_link $ld tmpdir/3.x "$ldflags tmpdir/3.o"] {
if ![ld_nm $nm tmpdir/3.x] {
unresolved $test4
} else {
if {[ info exists nm_output(bar__1A)]} {
send_log "bar__1A== $nm_output(_bar__1A)\n"
verbose "bar__1A == $nm_output(_bar__1A)"
if [info exists nm_output(bar__1A)] {
send_log "bar__1A == $nm_output(bar__1A)\n"
verbose "bar__1A == $nm_output(bar__1A)"
fail $test4
} else {
pass $test4
#note ld_nm trims leading `_' from _start
if ![info exists nm_output(start)] {
send_log "_start missing\n"
verbose "_start missing"
fail $test4
} else {
if ![info exists nm_output(foo__1A)] {
send_log "foo__1A missing\n"
verbose "foo_1A missing"
fail $test4
} else {
if ![info exists nm_output(foo__1B)] {
send_log "foo__1B missing\n"
verbose "foo_1B missing"
fail $test4
} else {
pass $test4
}
}
}
}
}
}
@ -163,7 +182,7 @@ if ![ld_simple_link $ld tmpdir/4.x "$ldflags tmpdir/4.o"] {
fail $test5
} else {
if {[info exists nm_output(foo__1A)]} {
send_log "foo__1A== $nm_output(foo__1A)\n"
send_log "foo__1A == $nm_output(foo__1A)\n"
verbose "foo__1A == $nm_output(foo__1A)"
fail $test5
} else {