aboutsummaryrefslogtreecommitdiff
path: root/ld/testsuite
diff options
context:
space:
mode:
authorAlan Modra <amodra@gmail.com>2000-04-12 12:47:25 +0000
committerAlan Modra <amodra@gmail.com>2000-04-12 12:47:25 +0000
commite76e4c9104c4584ce920f08b4695c9a0c5dba3c8 (patch)
tree53b1ddc7d2f5d40f3ab0cdd46cfb74b02864da3d /ld/testsuite
parent3017ff0ecac12fb625e1053794aabfbea9857dec (diff)
downloadgdb-e76e4c9104c4584ce920f08b4695c9a0c5dba3c8.zip
gdb-e76e4c9104c4584ce920f08b4695c9a0c5dba3c8.tar.gz
gdb-e76e4c9104c4584ce920f08b4695c9a0c5dba3c8.tar.bz2
(test4): Test for presence of foo__1B, not absence
Diffstat (limited to 'ld/testsuite')
-rw-r--r--ld/testsuite/ChangeLog5
-rw-r--r--ld/testsuite/ld-selective/selective.exp33
2 files changed, 29 insertions, 9 deletions
diff --git a/ld/testsuite/ChangeLog b/ld/testsuite/ChangeLog
index 8ba9415..89f94ff 100644
--- a/ld/testsuite/ChangeLog
+++ b/ld/testsuite/ChangeLog
@@ -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>
diff --git a/ld/testsuite/ld-selective/selective.exp b/ld/testsuite/ld-selective/selective.exp
index 0b5b77d..20b3a12 100644
--- a/ld/testsuite/ld-selective/selective.exp
+++ b/ld/testsuite/ld-selective/selective.exp
@@ -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 {