mirror of
https://github.com/bminor/binutils-gdb.git
synced 2025-12-26 09:08:59 +00:00
* gdb.base/a1-selftest.exp: Change "i*86-*-sysv4" xfail for
"backtrace through signal handler" to "i*86-*-sysv4*". * gdb.base/signals.exp: Add xfail for "'next' behaved as continue" case. Add "known SVR4 bug" to fail message. Add "i*86-*-bsdi2.0" xfail for "handle all print". Add "i*86-*-bsdi2.0" xfail for "backtrace in signals_tests_1". * gdb.base/ptype.exp: Add "i*86-*-sysv4*" xfail for "whatis unnamed typedef'd enum..." and "ptype t_char_array". * gdb.base/langs.exp: Add "i*86-*-sysv4*" xfail for "up to foo in langs.exp", "show language at foo in langs.exp", "up to cppsub_ in langs.exp", "show language at cppsub_ in langs.exp", "up to fsub in langs.exp", and "show language at fsub in langs.exp". * gdb.base/corefile.exp: Add "i*86-*-sysv4*" to xfail for "bactrace in corefile.exp". * gdb.base/callfuncs.exp: Change xfail to "i*86-*-*" for "call inferior function with struct - returns float" and "call inferior function with struct - returns double".
This commit is contained in:
@@ -446,7 +446,7 @@ GDB.*Copyright \[0-9\]+ Free Software Foundation, Inc..*$prompt $"\
|
||||
}
|
||||
|
||||
# get a stack trace
|
||||
setup_xfail "i*86-*-sysv4" "i*86-*-linux*"
|
||||
setup_xfail "i*86-*-linux*" "i*86-*-sysv4*"
|
||||
set description "backtrace through signal handler"
|
||||
send "backtrace\n"
|
||||
expect {
|
||||
|
||||
@@ -12,7 +12,7 @@
|
||||
#
|
||||
# You should have received a copy of the GNU General Public License
|
||||
# along with this program; if not, write to the Free Software
|
||||
# Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
|
||||
# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
|
||||
|
||||
# Please email any bugs, comments, and/or additions to this file to:
|
||||
# bug-gdb@prep.ai.mit.edu
|
||||
@@ -179,10 +179,10 @@ proc do_function_calls {} {
|
||||
"call inferior func with struct - returns int"
|
||||
gdb_test "p t_structs_l(struct_val1)" "= 51" \
|
||||
"call inferior func with struct - returns long"
|
||||
setup_xfail "i*86-*-linux*"
|
||||
setup_xfail "i*86-*-*"
|
||||
gdb_test "p t_structs_f(struct_val1)" "= 2.12.*" \
|
||||
"call inferior func with struct - returns float"
|
||||
setup_xfail "i*86-*-linux*"
|
||||
setup_xfail "i*86-*-*"
|
||||
gdb_test "p t_structs_d(struct_val1)" "= 9.87.*" \
|
||||
"call inferior func with struct - returns double"
|
||||
gdb_test "p t_structs_a(struct_val1)" "= \"foo\"" \
|
||||
|
||||
@@ -142,7 +142,7 @@ $prompt $" { pass "core-file command" }
|
||||
# file correctly. I don't think the other tests do this.
|
||||
|
||||
# Haven't investigated this xfail
|
||||
setup_xfail "m68k-*-hpux*" "i*86-*-linux*"
|
||||
setup_xfail "m68k-*-hpux*" "i*86-*-linux*" "i*86-*-sysv4*"
|
||||
gdb_test "bt" "abort.*func2.*func1.*main.*" "backtrace in corefile.exp"
|
||||
|
||||
# test reinit_frame_cache
|
||||
|
||||
68
gdb/testsuite/gdb.base/langs.exp
Normal file
68
gdb/testsuite/gdb.base/langs.exp
Normal file
@@ -0,0 +1,68 @@
|
||||
if $tracelevel then {
|
||||
strace $tracelevel
|
||||
}
|
||||
|
||||
set prms_id 0
|
||||
set bug_id 0
|
||||
|
||||
set binfile $objdir/$subdir/langs
|
||||
|
||||
if ![file exists $binfile] then {
|
||||
perror "$binfile does not exist."
|
||||
return 0
|
||||
}
|
||||
|
||||
gdb_exit
|
||||
gdb_start
|
||||
gdb_reinitialize_dir $srcdir/$subdir
|
||||
gdb_load $binfile
|
||||
|
||||
gdb_test "b langs0" {Function "langs0" not defined\.} \
|
||||
"break on nonexistent function in langs.exp"
|
||||
|
||||
if [runto csub] then {
|
||||
gdb_test "show language" "currently c\".*" \
|
||||
"show language at csub in langs.exp"
|
||||
# On some machines, foo doesn't get demangled because the N_SOL for
|
||||
# langs2.cxx is seen only after the function stab for foo. So
|
||||
# the following regexps are kludged to accept foo__Fi as well as foo,
|
||||
# even though only the latter is correct. I haven't tried to xfail it
|
||||
# because it depends on details of the compiler.
|
||||
gdb_test "bt" "#0.*csub.*#1.*(foo|foo__Fi) \\(.*#2.*cppsub_ .*#3.*fsub.*#4.*langs0__2do \\(.*#5 \[0-9a-fx\]* in main.*" "backtrace in langs.exp"
|
||||
|
||||
setup_xfail "i*86-*-sysv4*"
|
||||
gdb_test "up" ".* in (foo|foo__Fi) .* at langs2\\.cxx.*return csub \\(.*" \
|
||||
"up to foo in langs.exp"
|
||||
setup_xfail "i*86-*-sysv4*"
|
||||
gdb_test "show language" "currently c\\+\\+.*" \
|
||||
"show language at foo in langs.exp"
|
||||
|
||||
setup_xfail "i*86-*-sysv4*"
|
||||
gdb_test "up" ".* in cppsub_ .* at langs2\\.cxx.*return foo \\(.*" \
|
||||
"up to cppsub_ in langs.exp"
|
||||
setup_xfail "i*86-*-sysv4*"
|
||||
gdb_test "show language" "currently c\\+\\+.*" \
|
||||
"show language at cppsub_ in langs.exp"
|
||||
|
||||
setup_xfail "i*86-*-sysv4*"
|
||||
gdb_test "up" ".* in fsub.* at langs1\\.f.*return \\(cppsub .*" \
|
||||
"up to fsub in langs.exp"
|
||||
setup_xfail "i*86-*-sysv4*"
|
||||
gdb_test "show language" "currently fortran.*" \
|
||||
"show language at fsub in langs.exp"
|
||||
|
||||
gdb_test "up" ".* in langs0__2do .* at .*langs0\\.c.*return fsub.*" \
|
||||
"up to langs0__2do in langs.exp"
|
||||
gdb_test "show language" "currently c\".*" \
|
||||
"show language at langs0__2do in langs.exp"
|
||||
|
||||
gdb_test "up" ".* in main .* at .*langs0\\.c.*if \\(langs0__2do \\(.*" \
|
||||
"up to main in langs.exp"
|
||||
gdb_test "show language" "currently c\".*" \
|
||||
"show language at main in langs.exp"
|
||||
|
||||
gdb_test "cont" "Program exited normally\\." \
|
||||
"continue to exit in langs.exp"
|
||||
}
|
||||
|
||||
return 0
|
||||
@@ -1,4 +1,4 @@
|
||||
# Copyright (C) 1988, 1990, 1991, 1992 Free Software Foundation, Inc.
|
||||
# Copyright (C) 1988, 1990, 1991, 1992, 1994 Free Software Foundation, Inc.
|
||||
|
||||
# This program is free software; you can redistribute it and/or modify
|
||||
# it under the terms of the GNU General Public License as published by
|
||||
@@ -12,7 +12,7 @@
|
||||
#
|
||||
# You should have received a copy of the GNU General Public License
|
||||
# along with this program; if not, write to the Free Software
|
||||
# Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
|
||||
# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
|
||||
|
||||
# Please email any bugs, comments, and/or additions to this file to:
|
||||
# bug-gdb@prep.ai.mit.edu
|
||||
@@ -198,6 +198,7 @@ expect {
|
||||
# GDB's behavior is correct; the type which the variable is defined
|
||||
# as (51) doesn't have a name. Only 55 has a name.
|
||||
|
||||
setup_xfail "i*86-*-sysv4*"
|
||||
gdb_test "whatis v_boolean" "type = boolean" \
|
||||
"whatis unnamed typedef'd enum (compiler bug in IBM's xlc)"
|
||||
|
||||
@@ -470,6 +471,10 @@ expect {
|
||||
# timeout { fail "(timeout) ptype double array" }
|
||||
#}
|
||||
#
|
||||
|
||||
setup_xfail "i*86-*-sysv4*"
|
||||
gdb_test "ptype t_char_array" "type = (|unsigned )char \\\[0?\\\]"
|
||||
|
||||
#
|
||||
##
|
||||
## test ptype command with pointers
|
||||
@@ -589,7 +594,6 @@ expect {
|
||||
# timeout { fail "(timeout) ptype double pointer" }
|
||||
#}
|
||||
|
||||
|
||||
#
|
||||
# test ptype command with nested structure and union
|
||||
#
|
||||
@@ -686,10 +690,9 @@ expect {
|
||||
# the operation causes a slow painful death rather than a nice simple failure.
|
||||
|
||||
if ![istarget "*-*-udi*"] then {
|
||||
if [runto main] then {
|
||||
set timeout 120
|
||||
if [runto_main] then {
|
||||
setup_xfail "a29k-*-udi" 2416
|
||||
gdb_test "ptype \\\"abc\\\"" "type = char \\\[4\\\]"
|
||||
gdb_test "ptype \"abc\"" "type = char \\\[4\\\]"
|
||||
setup_xfail "a29k-*-udi" 2416
|
||||
gdb_test "ptype {'a','b','c'}" "type = char \\\[3\\\]"
|
||||
setup_xfail "a29k-*-udi" 2416
|
||||
@@ -701,13 +704,8 @@ if ![istarget "*-*-udi*"] then {
|
||||
setup_xfail "a29k-*-udi" 2416
|
||||
gdb_test "ptype {{0,1,2},{3,4,5}}" "type = int \\\[2\\\]\\\[3\\\]"
|
||||
setup_xfail "a29k-*-udi" 2416
|
||||
gdb_test "ptype {4,5,6}\\\[2\\\]" "type = int"
|
||||
gdb_test "ptype {4,5,6}\[2\]" "type = int"
|
||||
setup_xfail "a29k-*-udi" 2416
|
||||
gdb_test "ptype *&{4,5,6}\\\[1\\\]" "type = int"
|
||||
set timeout 10
|
||||
if [istarget "a29k-*-udi"] then {
|
||||
# FIXME: If PR 2415 is fixed, this is not needed.
|
||||
gdb_target_udi
|
||||
}
|
||||
gdb_test "ptype *&{4,5,6}\[1\]" "type = int"
|
||||
}
|
||||
}
|
||||
|
||||
@@ -92,7 +92,20 @@ proc signal_tests_1 {} {
|
||||
# Solaris is not a relevant data point either way
|
||||
# because it lacks single stepping.
|
||||
|
||||
fail "'next' behaved as 'continue'"
|
||||
# fnf: I don't agree with the above philosophy. We
|
||||
# can never be sure that any particular XFAIL is
|
||||
# specified 100% correctly in that no systems with
|
||||
# the bug are missed and all systems without the bug
|
||||
# are excluded. If we include an XFAIL that isn't
|
||||
# appropriate for a particular system, then when that
|
||||
# system gets tested it will XPASS, and someone should
|
||||
# investigate and fix the setup_xfail as appropriate,
|
||||
# or more preferably, the actual bug. Each such case
|
||||
# adds more data to narrowing down the scope of the
|
||||
# problem and ultimately fixing it.
|
||||
|
||||
setup_xfail "i*86-*-sysv4*"
|
||||
fail "'next' behaved as 'continue (known SVR4 bug)'"
|
||||
return 0
|
||||
}
|
||||
-re ".*$prompt $" { fail "next to 2nd alarm (1)" }
|
||||
@@ -128,7 +141,7 @@ proc signal_tests_1 {} {
|
||||
# This doesn't test that main is frame #2, just that main is frame
|
||||
# #2, #3, or higher. At some point this should be fixed (but
|
||||
# it quite possibly would introduce new FAILs on some systems).
|
||||
setup_xfail "i*86-*-linux"
|
||||
setup_xfail "i*86-*-linux" "i*86-*-bsdi2.0"
|
||||
gdb_test "backtrace" "#0.*handler.*#1.*#2.*main.*" \
|
||||
"backtrace in signals_tests_1"
|
||||
|
||||
@@ -276,6 +289,7 @@ gdb_start
|
||||
# This will need to be updated as the exact list of signals changes,
|
||||
# but I want to test that TARGET_SIGNAL_0, TARGET_SIGNAL_DEFAULT, and
|
||||
# TARGET_SIGNAL_UNKNOWN are skipped.
|
||||
setup_xfail "i*86-unknown-bsdi2.0"
|
||||
gdb_test "handle all print" "Signal Stop Print Pass to program Description\r\nSIGHUP Yes Yes Yes Hangup.*SIG63 Yes Yes Yes Real-time event 63"
|
||||
|
||||
gdb_exit
|
||||
|
||||
Reference in New Issue
Block a user