OpenE2K
/
binutils-gdb
12
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

* lib/gdb.exp (gdb_expect_list): Only print one pass, fail, or 

supress message.
This commit is contained in:
Andrew Cagney 2002-08-01 22:06:49 +00:00
parent 32a6503c60
commit a20ce2c398
2 changed files with 15 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
gdb/testsuite/ChangeLog
View File

@ -1,3 +1,8 @@
2002-08-01 Andrew Cagney <ac131313@redhat.com>
* lib/gdb.exp (gdb_expect_list): Only print one pass, fail, or
supress message.
2002-08-01 Andrew Cagney <cagney@redhat.com>
* Makefile.in (TARGET_FLAGS_TO_PASS): Remove CHILLFLAGS, CHILL,

18
gdb/testsuite/lib/gdb.exp
View File

@ -1265,6 +1265,7 @@ proc gdb_expect_list {test sentinel list} {
set ok 1
if { $suppress_flag } {
set ok 0
unresolved "${test}"
}
while { ${index} < [llength ${list}] } {
set pattern [lindex ${list} ${index}]
@ -1273,41 +1274,42 @@ proc gdb_expect_list {test sentinel list} {
if { ${ok} } {
gdb_expect {
-re "${pattern}${sentinel}" {
pass "${test}, pattern ${index} + sentinel"
# pass "${test}, pattern ${index} + sentinel"
}
-re "${sentinel}" {
fail "${test}, pattern ${index} + sentinel"
fail "${test} (pattern ${index} + sentinel)"
set ok 0
}
timeout {
fail "${test}, pattern ${index} + sentinel (timeout)"
fail "${test} (pattern ${index} + sentinel) (timeout)"
set ok 0
}
}
} else {
unresolved "${test}, pattern ${index} + sentinel"
# unresolved "${test}, pattern ${index} + sentinel"
}
} else {
if { ${ok} } {
gdb_expect {
-re "${pattern}" {
pass "${test}, pattern ${index}"
# pass "${test}, pattern ${index}"
}
-re "${sentinel}" {
fail "${test}, pattern ${index}"
fail "${test} (pattern ${index})"
set ok 0
}
timeout {
fail "${test}, pattern ${index} (timeout)"
fail "${test} (pattern ${index}) (timeout)"
set ok 0
}
}
} else {
unresolved "${test}, pattern ${index}"
# unresolved "${test}, pattern ${index}"
}
}
}
if { ${ok} } {
pass "${test}"
return 0
} else {
return 1