darkkirb/old-cross-binutils
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

* gdb.stabs/wierd.exp: Check for eof, directly or via gdb_test.

Browse source 
Remove some xfails
This commit is contained in:
Jim Kingdon 1993-05-25 19:32:19 +00:00
parent 3c0646f91a
commit 16b00357e8
1 changed files with 6 additions and 25 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

31
gdb/testsuite/gdb.stabs/wierd.exp
View file

@ -32,14 +32,13 @@ expect {
error "couldn't load $binfile into $GDB (timed out)."
return -1
}
eof { fail "(eof) cannot read wierd.o" }
}
proc print_wierd_var { var } {
global prompt
# Currently one of these symbols gives an error() in symbol
# reading, which causes any attempt to read (full, not
# partial) symbols for the file to lose.
# GDB does not yet understand type attributes
setup_xfail "*-*-*"
# Make sure that the variable gets printed out correctly, without
@ -55,24 +54,17 @@ proc print_wierd_var { var } {
return 0
}
timeout { fail "variable $var not printed (timeout)" }
eof { fail "(eof) variable $var not printed" }
}
# Currently one of these symbols gives an error() in symbol
# reading, which causes any attempt to read (full, not
# partial) symbols for the file to lose.
# GDB does not yet understand type attributes
setup_xfail "*-*-*"
# Make sure that the stabs did get loaded in a sensible way.
# If somehow the stabs got skipped, then the above test can
# pass because GDB assumes int for variables without a stab.
send "whatis $var\n"
expect {
-re "type = unsigned int.*$prompt $" {pass "whatis on $var"}
-re "type = inttype.*$prompt $" {pass "whatis on $var"}
-re "$prompt $" {fail "whatis on $var"}
timeout {fail "whatis on $var"}
}
gdb_test "whatis $var\n" "type = (unsigned int|inttype)" "whatis on $var"
}
print_wierd_var var0
@ -163,19 +155,8 @@ print_wierd_var attr124
print_wierd_var attr125
print_wierd_var attr126
# Currently one of these symbols gives an error() in symbol
# reading, which causes any attempt to read (full, not
# partial) symbols for the file to lose.
setup_xfail "*-*-*"
# One last test, while we're at it.
send "ptype inttype\n"
expect {
-re "type = unsigned int.*$prompt $" {pass "ptype on inttype"}
-re "type = inttype.*$prompt $" {pass "ptype on inttype"}
-re "$prompt $" {fail "ptype on inttype"}
timeout {fail "ptype on inttype"}
}
gdb_test "ptype inttype\n" "type = (unsigned int|inttype)" "ptype on inttype"
#Prevent some failures in default.exp, which are probably GDB bugs
# (but trivial ones).