This is the mail archive of the
gdb-patches@sources.redhat.com
mailing list for the GDB project.
hppa2.0w -> hppa64 conversion
- From: law at redhat dot com
- To: gdb-patches at sources dot redhat dot com
- Date: Wed, 19 Dec 2001 13:44:58 -0700
- Subject: hppa2.0w -> hppa64 conversion
- Reply-to: law at redhat dot com
Some time ago the HP 64bit configuration was renamed from "hppa2.0w" to
"hppa64". However, it appears that the GDB testsuite was not updated
to deal with the name change.
This patch fixes the tests in gdb.base to use the new naming scheme.
Patches for the other subdirectories will follow.
* gdb.base/condbreak.exp: Use "hppa64-*-*", not "hppa2.0w-*-*"
to determine if we're testing a PA64 target.
* gdb.base/display.exp: Likewise.
* gdb.base/foll-exec.exp: Likewise.
* gdb.base/foll-vfork.exp: Likewise.
* gdb.base/funcargs.exp: Likewise.
* gdb.base/scope.exp: Likewise.
* gdb.base/sect-cmd.exp: Likewise.
* gdb.base/step-test.exp: Likewise.
Index: condbreak.exp
===================================================================
RCS file: /cvs/cvsfiles/devo/gdb/testsuite/gdb.base/condbreak.exp,v
retrieving revision 1.12
diff -c -3 -p -r1.12 condbreak.exp
*** condbreak.exp 2001/06/14 21:03:31 1.12
--- condbreak.exp 2001/12/19 20:41:19
*************** gdb_expect {
*** 189,195 ****
# run until the breakpoint at marker2
# Same issues here as above.
! setup_xfail hppa2.0w-*-* 11512CLLbs
send_gdb "continue\n"
gdb_expect {
-re "Continuing\\..*Breakpoint \[0-9\]+, marker2 \\(a=43\\) at
.*$srcfile:4\[49\].*4\[49\]\[\t \]+.*" {
--- 189,195 ----
# run until the breakpoint at marker2
# Same issues here as above.
! setup_xfail hppa64-*-* 11512CLLbs
send_gdb "continue\n"
gdb_expect {
-re "Continuing\\..*Breakpoint \[0-9\]+, marker2 \\(a=43\\) at
.*$srcfile:4\[49\].*4\[49\]\[\t \]+.*" {
Index: display.exp
===================================================================
RCS file: /cvs/cvsfiles/devo/gdb/testsuite/gdb.base/display.exp,v
retrieving revision 1.18
diff -c -3 -p -r1.18 display.exp
*** display.exp 2001/09/17 20:42:44 1.18
--- display.exp 2001/12/19 20:41:19
*************** gdb_test "print/r j" ".*Undefined output
*** 185,191 ****
gdb_test "print j" ".*" "debug test output"
# x/0 j doesn't produce any output and terminates PA64 process when testing
! if [istarget "hppa2.0w-hp-hpux11*"] {
xfail "'x/0 j' terminates PA64 process - skipped test point"
} else {
gdb_test "x/0 j" ".*"
--- 185,191 ----
gdb_test "print j" ".*" "debug test output"
# x/0 j doesn't produce any output and terminates PA64 process when testing
! if [istarget "hppa64-hp-hpux11*"] {
xfail "'x/0 j' terminates PA64 process - skipped test point"
} else {
gdb_test "x/0 j" ".*"
Index: foll-exec.exp
===================================================================
RCS file: /cvs/cvsfiles/devo/gdb/testsuite/gdb.base/foll-exec.exp,v
retrieving revision 1.4
diff -c -3 -p -r1.4 foll-exec.exp
*** foll-exec.exp 2001/03/26 19:55:24 1.4
--- foll-exec.exp 2001/12/19 20:41:19
*************** proc do_exec_tests {} {
*** 209,215 ****
# DTS CLLbs16760
# PA64 doesn't know about $START$ in dld.sl at this point. It should.
# - Michael Coulter
! setup_xfail hppa2.0w-hp-hpux* CLLbs16760
send_gdb "continue\n"
gdb_expect {
-re ".*Executing new program:.*${testfile2}.*Catchpoint .*(exec\'d
.*${testfile2}).*in .START..*$gdb_prompt $"\
--- 209,215 ----
# DTS CLLbs16760
# PA64 doesn't know about $START$ in dld.sl at this point. It should.
# - Michael Coulter
! setup_xfail hppa64-hp-hpux* CLLbs16760
send_gdb "continue\n"
gdb_expect {
-re ".*Executing new program:.*${testfile2}.*Catchpoint .*(exec\'d
.*${testfile2}).*in .START..*$gdb_prompt $"\
Index: foll-vfork.exp
===================================================================
RCS file: /cvs/cvsfiles/devo/gdb/testsuite/gdb.base/foll-vfork.exp,v
retrieving revision 1.4
diff -c -3 -p -r1.4 foll-vfork.exp
*** foll-vfork.exp 2001/03/26 19:55:24 1.4
--- foll-vfork.exp 2001/12/19 20:41:19
*************** if { ![isnative] } then {
*** 28,34 ****
set prms_id 0
set bug_id 0
! if [istarget "hppa2.0w-hp-hpux*"] {
warning "Don't run gdb.base/foll-vfork.exp until JAGaa43495 kernel problem
is fixed."
return 0
}
--- 28,34 ----
set prms_id 0
set bug_id 0
! if [istarget "hppa64-hp-hpux*"] {
warning "Don't run gdb.base/foll-vfork.exp until JAGaa43495 kernel problem
is fixed."
return 0
}
Index: funcargs.exp
===================================================================
RCS file: /cvs/cvsfiles/devo/gdb/testsuite/gdb.base/funcargs.exp,v
retrieving revision 1.47
diff -c -3 -p -r1.47 funcargs.exp
*** funcargs.exp 2001/03/26 19:55:24 1.47
--- funcargs.exp 2001/12/19 20:41:20
*************** proc float_and_integral_args {} {
*** 189,195 ****
setup_xfail "a29k-*-udi"
if {!$gcc_compiled} then { setup_xfail "rs6000-*-*" "mips-sgi-irix5*" }
# The debug info. for "f" is not correct. It's a known bug.
! if {$hp_cc_compiler} {setup_xfail hppa2.0w-*-*}
gdb_run_cmd
gdb_expect {
-re ".* call2a \\(c=97 'a', f1=4, s=1, d1=5, i=2, f2=4, l=3, d2=5\\)
.*$gdb_prompt $" { pass "run to call2a" }
--- 189,195 ----
setup_xfail "a29k-*-udi"
if {!$gcc_compiled} then { setup_xfail "rs6000-*-*" "mips-sgi-irix5*" }
# The debug info. for "f" is not correct. It's a known bug.
! if {$hp_cc_compiler} {setup_xfail hppa64-*-*}
gdb_run_cmd
gdb_expect {
-re ".* call2a \\(c=97 'a', f1=4, s=1, d1=5, i=2, f2=4, l=3, d2=5\\)
.*$gdb_prompt $" { pass "run to call2a" }
*************** proc float_and_integral_args {} {
*** 200,254 ****
# Print each arg as a double check to see if we can print
gdb_test "print c" ".* = 97 'a'" "print c after run to call2a"
! if {$hp_cc_compiler} {setup_xfail hppa2.0w-*-*}
gdb_test "print f1" ".* = 4" "print f1 after run to call2a"
gdb_test "print s" ".* = 1" "print s after run to call2a"
gdb_test "print d1" ".* = 5" "print d1 after run to call2a"
gdb_test "print i" ".* = 2" "print i after run to call2a"
! if {$hp_cc_compiler} {setup_xfail hppa2.0w-*-*}
gdb_test "print f2" ".* = 4" "print f2 after run to call2a"
gdb_test "print l" ".* = 3" "print l after run to call2a"
gdb_test "print d2" ".* = 5" "print d2 after run to call2a"
setup_xfail "rs6000-*-*"
! if {$hp_cc_compiler} {setup_xfail hppa2.0w-*-*}
if {!$gcc_compiled} then { setup_xfail "mips-sgi-irix*" }
# Continue; should stop at call2b and print actual arguments.
if [gdb_test "cont" ".* call2b \\(f1=4, s=1, d1=5, i=2, f2=4, l=3, d2=5,
c=97 'a'\\) .*" "continue to call2b"] {
gdb_suppress_tests;
}
! if {$hp_cc_compiler} {setup_xfail hppa2.0w-*-*}
# Continue; should stop at call2c and print actual arguments.
if [gdb_test "cont" ".* call2c \\(s=1, d1=5, i=2, f2=4, l=3, d2=5, c=97
'a', f1=4\\) .*" "continue to call2c"] {
gdb_suppress_tests;
}
! if {$hp_cc_compiler} {setup_xfail hppa2.0w-*-*}
# Continue; should stop at call2d and print actual arguments.
if [gdb_test "cont" ".* call2d \\(d1=5, i=2, f2=4, l=3, d2=5, c=97 'a',
f1=4, s=1\\) .*" "continue to call2d"] {
gdb_suppress_tests;
}
! if {$hp_cc_compiler} {setup_xfail hppa2.0w-*-*}
# Continue; should stop at call2e and print actual arguments.
if [gdb_test "cont" ".* call2e \\(i=2, f2=4, l=3, d2=5, c=97 'a', f1=4,
s=1, d1=5\\) .*" "continue to call2e"] {
gdb_suppress_tests;
}
! if {$hp_cc_compiler} {setup_xfail hppa2.0w-*-*}
# Continue; should stop at call2f and print actual arguments.
if [gdb_test "cont" ".* call2f \\(f2=4, l=3, d2=5, c=97 'a', f1=4, s=1,
d1=5, i=2\\) .*" "continue to call2f"] {
gdb_suppress_tests;
}
! if {$hp_cc_compiler} {setup_xfail hppa2.0w-*-*}
# Continue; should stop at call2g and print actual arguments.
if [gdb_test "cont" ".* call2g \\(l=3, d2=5, c=97 'a', f1=4, s=1, d1=5,
i=2, f2=4\\) .*" "continue to call2g"] {
gdb_suppress_tests;
}
! if {$hp_cc_compiler} {setup_xfail hppa2.0w-*-*}
# Continue; should stop at call2h and print actual arguments.
if [gdb_test "cont" ".* call2h \\(d2=5, c=97 'a', f1=4, s=1, d1=5, i=2,
f2=4, l=3\\) .*" "continue to call2h"] {
gdb_suppress_tests;
--- 200,254 ----
# Print each arg as a double check to see if we can print
gdb_test "print c" ".* = 97 'a'" "print c after run to call2a"
! if {$hp_cc_compiler} {setup_xfail hppa64-*-*}
gdb_test "print f1" ".* = 4" "print f1 after run to call2a"
gdb_test "print s" ".* = 1" "print s after run to call2a"
gdb_test "print d1" ".* = 5" "print d1 after run to call2a"
gdb_test "print i" ".* = 2" "print i after run to call2a"
! if {$hp_cc_compiler} {setup_xfail hppa64-*-*}
gdb_test "print f2" ".* = 4" "print f2 after run to call2a"
gdb_test "print l" ".* = 3" "print l after run to call2a"
gdb_test "print d2" ".* = 5" "print d2 after run to call2a"
setup_xfail "rs6000-*-*"
! if {$hp_cc_compiler} {setup_xfail hppa64-*-*}
if {!$gcc_compiled} then { setup_xfail "mips-sgi-irix*" }
# Continue; should stop at call2b and print actual arguments.
if [gdb_test "cont" ".* call2b \\(f1=4, s=1, d1=5, i=2, f2=4, l=3, d2=5,
c=97 'a'\\) .*" "continue to call2b"] {
gdb_suppress_tests;
}
! if {$hp_cc_compiler} {setup_xfail hppa64-*-*}
# Continue; should stop at call2c and print actual arguments.
if [gdb_test "cont" ".* call2c \\(s=1, d1=5, i=2, f2=4, l=3, d2=5, c=97
'a', f1=4\\) .*" "continue to call2c"] {
gdb_suppress_tests;
}
! if {$hp_cc_compiler} {setup_xfail hppa64-*-*}
# Continue; should stop at call2d and print actual arguments.
if [gdb_test "cont" ".* call2d \\(d1=5, i=2, f2=4, l=3, d2=5, c=97 'a',
f1=4, s=1\\) .*" "continue to call2d"] {
gdb_suppress_tests;
}
! if {$hp_cc_compiler} {setup_xfail hppa64-*-*}
# Continue; should stop at call2e and print actual arguments.
if [gdb_test "cont" ".* call2e \\(i=2, f2=4, l=3, d2=5, c=97 'a', f1=4,
s=1, d1=5\\) .*" "continue to call2e"] {
gdb_suppress_tests;
}
! if {$hp_cc_compiler} {setup_xfail hppa64-*-*}
# Continue; should stop at call2f and print actual arguments.
if [gdb_test "cont" ".* call2f \\(f2=4, l=3, d2=5, c=97 'a', f1=4, s=1,
d1=5, i=2\\) .*" "continue to call2f"] {
gdb_suppress_tests;
}
! if {$hp_cc_compiler} {setup_xfail hppa64-*-*}
# Continue; should stop at call2g and print actual arguments.
if [gdb_test "cont" ".* call2g \\(l=3, d2=5, c=97 'a', f1=4, s=1, d1=5,
i=2, f2=4\\) .*" "continue to call2g"] {
gdb_suppress_tests;
}
! if {$hp_cc_compiler} {setup_xfail hppa64-*-*}
# Continue; should stop at call2h and print actual arguments.
if [gdb_test "cont" ".* call2h \\(d2=5, c=97 'a', f1=4, s=1, d1=5, i=2,
f2=4, l=3\\) .*" "continue to call2h"] {
gdb_suppress_tests;
*************** proc float_and_integral_args {} {
*** 259,265 ****
delete_breakpoints
gdb_breakpoint call2i
! if {$hp_cc_compiler} {setup_xfail hppa2.0w-*-*}
# Continue; should stop at call2i and print actual arguments.
if [gdb_test "cont" ".* call2i \\(c1=97 'a', f1=4, c2=97 'a', c3=97 'a',
d1=5, c4=97 'a', c5=97 'a', c6=97 'a', f2=4, s=1, c7=97 'a', d2=5\\) .*"
"continue to call2i"] {
gdb_suppress_tests;
--- 259,265 ----
delete_breakpoints
gdb_breakpoint call2i
! if {$hp_cc_compiler} {setup_xfail hppa64-*-*}
# Continue; should stop at call2i and print actual arguments.
if [gdb_test "cont" ".* call2i \\(c1=97 'a', f1=4, c2=97 'a', c3=97 'a',
d1=5, c4=97 'a', c5=97 'a', c6=97 'a', f2=4, s=1, c7=97 'a', d2=5\\) .*"
"continue to call2i"] {
gdb_suppress_tests;
*************** proc discard_and_shuffle {} {
*** 497,503 ****
}
# The debug info. for "f" is not correct. It's a known bug.
! if {$hp_cc_compiler} {setup_xfail hppa2.0w-*-*}
send_gdb "backtrace 100\n"
gdb_expect {
-re "backtrace 100\[\r\n\]+
--- 497,503 ----
}
# The debug info. for "f" is not correct. It's a known bug.
! if {$hp_cc_compiler} {setup_xfail hppa64-*-*}
send_gdb "backtrace 100\n"
gdb_expect {
-re "backtrace 100\[\r\n\]+
*************** $gdb_prompt $" {
*** 527,533 ****
gdb_continue call6b
! if {$hp_cc_compiler} {setup_xfail hppa2.0w-*-*}
send_gdb "backtrace 100\n"
if [gdb_expect_list "backtrace from call6b" ".*$gdb_prompt $" {
".*\[\r\n\]#0 .* call6b \\(s=1, i=2, l=3, f=4, d=5, uc=98 'b', us=6, ui=7,
ul=8\\) "
--- 527,533 ----
gdb_continue call6b
! if {$hp_cc_compiler} {setup_xfail hppa64-*-*}
send_gdb "backtrace 100\n"
if [gdb_expect_list "backtrace from call6b" ".*$gdb_prompt $" {
".*\[\r\n\]#0 .* call6b \\(s=1, i=2, l=3, f=4, d=5, uc=98 'b', us=6, ui=7,
ul=8\\) "
*************** $gdb_prompt $" {
*** 542,548 ****
gdb_continue call6c
! if {$hp_cc_compiler} {setup_xfail hppa2.0w-*-*}
send_gdb "backtrace 100\n"
if [gdb_expect_list "backtrace from call6c" ".*$gdb_prompt $" {
".*\[\r\n\]#0 .* call6c \\(i=2, l=3, f=4, d=5, uc=98 'b', us=6, ui=7,
ul=8\\) "
--- 542,548 ----
gdb_continue call6c
! if {$hp_cc_compiler} {setup_xfail hppa64-*-*}
send_gdb "backtrace 100\n"
if [gdb_expect_list "backtrace from call6c" ".*$gdb_prompt $" {
".*\[\r\n\]#0 .* call6c \\(i=2, l=3, f=4, d=5, uc=98 'b', us=6, ui=7,
ul=8\\) "
*************** $gdb_prompt $" {
*** 557,563 ****
gdb_continue call6d
! if {$hp_cc_compiler} {setup_xfail hppa2.0w-*-*}
send_gdb "backtrace 100\n"
if [gdb_expect_list "backtrace from call6d" ".*$gdb_prompt $" {
".*\[\r\n\]#0 .* call6d \\(l=3, f=4, d=5, uc=98 'b', us=6, ui=7, ul=8\\) "
--- 557,563 ----
gdb_continue call6d
! if {$hp_cc_compiler} {setup_xfail hppa64-*-*}
send_gdb "backtrace 100\n"
if [gdb_expect_list "backtrace from call6d" ".*$gdb_prompt $" {
".*\[\r\n\]#0 .* call6d \\(l=3, f=4, d=5, uc=98 'b', us=6, ui=7, ul=8\\) "
*************** $gdb_prompt $" {
*** 574,580 ****
gdb_continue call6e
! if {$hp_cc_compiler} {setup_xfail hppa2.0w-*-*}
send_gdb "backtrace 100\n"
if [gdb_expect_list "backtrace from call6e" ".*$gdb_prompt $" {
".*\[\r\n\]#0 .* call6e \\(f=4, d=5, uc=98 'b', us=6, ui=7, ul=8\\) "
--- 574,580 ----
gdb_continue call6e
! if {$hp_cc_compiler} {setup_xfail hppa64-*-*}
send_gdb "backtrace 100\n"
if [gdb_expect_list "backtrace from call6e" ".*$gdb_prompt $" {
".*\[\r\n\]#0 .* call6e \\(f=4, d=5, uc=98 'b', us=6, ui=7, ul=8\\) "
*************** $gdb_prompt $" {
*** 592,598 ****
gdb_continue call6f
! if {$hp_cc_compiler} {setup_xfail hppa2.0w-*-*}
send_gdb "backtrace 100\n"
if [gdb_expect_list "backtrace from call6f" ".*$gdb_prompt $" {
".*\[\r\n\]#0 .* call6f \\(d=5, uc=98 'b', us=6, ui=7, ul=8\\) "
--- 592,598 ----
gdb_continue call6f
! if {$hp_cc_compiler} {setup_xfail hppa64-*-*}
send_gdb "backtrace 100\n"
if [gdb_expect_list "backtrace from call6f" ".*$gdb_prompt $" {
".*\[\r\n\]#0 .* call6f \\(d=5, uc=98 'b', us=6, ui=7, ul=8\\) "
*************** $gdb_prompt $" {
*** 611,617 ****
gdb_continue call6g
! if {$hp_cc_compiler} {setup_xfail hppa2.0w-*-*}
send_gdb "backtrace 100\n"
if [gdb_expect_list "backtrace from call6g" ".*$gdb_prompt $" {
".*\[\r\n\]#0 .* call6g \\(uc=98 'b', us=6, ui=7, ul=8\\) "
--- 611,617 ----
gdb_continue call6g
! if {$hp_cc_compiler} {setup_xfail hppa64-*-*}
send_gdb "backtrace 100\n"
if [gdb_expect_list "backtrace from call6g" ".*$gdb_prompt $" {
".*\[\r\n\]#0 .* call6g \\(uc=98 'b', us=6, ui=7, ul=8\\) "
*************** $gdb_prompt $" {
*** 631,637 ****
gdb_continue call6h
! if {$hp_cc_compiler} {setup_xfail hppa2.0w-*-*}
send_gdb "backtrace 100\n"
if [gdb_expect_list "backtrace from call6h" ".*$gdb_prompt $" {
".*\[\r\n\]#0 .* call6h \\(us=6, ui=7, ul=8\\) "
--- 631,637 ----
gdb_continue call6h
! if {$hp_cc_compiler} {setup_xfail hppa64-*-*}
send_gdb "backtrace 100\n"
if [gdb_expect_list "backtrace from call6h" ".*$gdb_prompt $" {
".*\[\r\n\]#0 .* call6h \\(us=6, ui=7, ul=8\\) "
*************** $gdb_prompt $" {
*** 659,665 ****
gdb_continue call6i
! if {$hp_cc_compiler} {setup_xfail hppa2.0w-*-*}
send_gdb "backtrace 100\n"
if [gdb_expect_list "backtrace from call6i" ".*$gdb_prompt $" {
".*\[\r\n\]#0 .* call6i \\(ui=7, ul=8\\) "
--- 659,665 ----
gdb_continue call6i
! if {$hp_cc_compiler} {setup_xfail hppa64-*-*}
send_gdb "backtrace 100\n"
if [gdb_expect_list "backtrace from call6i" ".*$gdb_prompt $" {
".*\[\r\n\]#0 .* call6i \\(ui=7, ul=8\\) "
*************** $gdb_prompt $" {
*** 681,687 ****
gdb_continue call6j
! if {$hp_cc_compiler} {setup_xfail hppa2.0w-*-*}
send_gdb "backtrace 100\n"
if [gdb_expect_list "backtrace from call6j" ".*$gdb_prompt $" {
".*\[\r\n\]#0 .* call6j \\(ul=8\\) "
--- 681,687 ----
gdb_continue call6j
! if {$hp_cc_compiler} {setup_xfail hppa64-*-*}
send_gdb "backtrace 100\n"
if [gdb_expect_list "backtrace from call6j" ".*$gdb_prompt $" {
".*\[\r\n\]#0 .* call6j \\(ul=8\\) "
*************** $gdb_prompt $" {
*** 706,712 ****
setup_xfail "i960-*-vxworks" 1786
gdb_continue call6k
! if {$hp_cc_compiler} {setup_xfail hppa2.0w-*-*}
send_gdb "backtrace 100\n"
if [gdb_expect_list "backtrace from call6k" ".*$gdb_prompt $" {
".*\[\r\n\]#0 .* call6k \\(\\) "
--- 706,712 ----
setup_xfail "i960-*-vxworks" 1786
gdb_continue call6k
! if {$hp_cc_compiler} {setup_xfail hppa64-*-*}
send_gdb "backtrace 100\n"
if [gdb_expect_list "backtrace from call6k" ".*$gdb_prompt $" {
".*\[\r\n\]#0 .* call6k \\(\\) "
*************** proc shuffle_round_robin {} {
*** 769,775 ****
setup_xfail "i960-*-*" 1813
if {!$gcc_compiled} then { setup_xfail "rs6000-*-*" "mips-sgi-irix5*" }
# The debug info. for "f" is not correct. It's a known bug.
! if {$hp_cc_compiler} {setup_xfail hppa2.0w-*-*}
send_gdb "backtrace 100\n"
gdb_expect {
-re "backtrace 100\[\r\n\]+
--- 769,775 ----
setup_xfail "i960-*-*" 1813
if {!$gcc_compiled} then { setup_xfail "rs6000-*-*" "mips-sgi-irix5*" }
# The debug info. for "f" is not correct. It's a known bug.
! if {$hp_cc_compiler} {setup_xfail hppa64-*-*}
send_gdb "backtrace 100\n"
gdb_expect {
-re "backtrace 100\[\r\n\]+
*************** proc localvars_in_indirect_call { } {
*** 1126,1132 ****
send_gdb "finish\n"
gdb_expect {
-re "\\(\\*pointer_to_call0a\\) \\(c, s, i, l\\);.*First.*$gdb_prompt $" {
! #On hppa2.0w-hp-hpux11.00, gdb finishes at one line earlier than
#hppa1.1-hp-hpux11.00. Therefore, an extra "step" is necessary to continue
the test.
send_gdb "step\n"
exp_continue
--- 1126,1132 ----
send_gdb "finish\n"
gdb_expect {
-re "\\(\\*pointer_to_call0a\\) \\(c, s, i, l\\);.*First.*$gdb_prompt $" {
! #On hppa64-hp-hpux11.00, gdb finishes at one line earlier than
#hppa1.1-hp-hpux11.00. Therefore, an extra "step" is necessary to continue
the test.
send_gdb "step\n"
exp_continue
Index: scope.exp
===================================================================
RCS file: /cvs/cvsfiles/devo/gdb/testsuite/gdb.base/scope.exp,v
retrieving revision 1.34
diff -c -3 -p -r1.34 scope.exp
*** scope.exp 2001/03/26 19:55:27 1.34
--- scope.exp 2001/12/19 20:41:20
*************** proc test_at_main {} {
*** 113,119 ****
# Print scope1.c::filelocal, which is 2
if {$gcc_compiled} then { setup_xfail "rs6000-*-*" }
! if {$hp_cc_compiler} then { setup_xfail "hppa2.0w-*-*" 11747CLLbs}
if [gdb_test "print 'scope1.c'::filelocal" "\\\$$decimal = 2" "print
'scope1.c'::filelocal" "No symbol \"scope1.c\" in current context.*" "print
'$srcdir/$subdir/scope1.c'::filelocal"] {
gdb_suppress_tests ;
}
--- 113,119 ----
# Print scope1.c::filelocal, which is 2
if {$gcc_compiled} then { setup_xfail "rs6000-*-*" }
! if {$hp_cc_compiler} then { setup_xfail "hppa64-*-*" 11747CLLbs}
if [gdb_test "print 'scope1.c'::filelocal" "\\\$$decimal = 2" "print
'scope1.c'::filelocal" "No symbol \"scope1.c\" in current context.*" "print
'$srcdir/$subdir/scope1.c'::filelocal"] {
gdb_suppress_tests ;
}
*************** proc test_at_main {} {
*** 122,128 ****
# Print scope1.c::filelocal_bss, which is 102
if {$gcc_compiled} then { setup_xfail "rs6000-*-*" }
! if {$hp_cc_compiler} then { setup_xfail "hppa2.0w-*-*" 11747CLLbs}
if [gdb_test "print 'scope1.c'::filelocal_bss" "\\\$$decimal = 102"
"print 'scope1.c'::filelocal_bss" "No symbol \"scope1.c\" in current
context.*" "print '$srcdir/$subdir/scope1.c'::filelocal_bss"] {
gdb_suppress_tests ;
}
--- 122,128 ----
# Print scope1.c::filelocal_bss, which is 102
if {$gcc_compiled} then { setup_xfail "rs6000-*-*" }
! if {$hp_cc_compiler} then { setup_xfail "hppa64-*-*" 11747CLLbs}
if [gdb_test "print 'scope1.c'::filelocal_bss" "\\\$$decimal = 102"
"print 'scope1.c'::filelocal_bss" "No symbol \"scope1.c\" in current
context.*" "print '$srcdir/$subdir/scope1.c'::filelocal_bss"] {
gdb_suppress_tests ;
}
*************** proc test_at_main {} {
*** 131,137 ****
# Print scope1.c::filelocal_ro, which is 202
if {$gcc_compiled} then { setup_xfail "rs6000-*-*" }
! if {$hp_cc_compiler} then { setup_xfail "hppa2.0w-*-*" 11747CLLbs}
if [gdb_test "print 'scope1.c'::filelocal_ro" "\\\$$decimal = 202"
"print 'scope1.c'::filelocal_ro" "No symbol \"scope1.c\" in current
context.*" "print '$srcdir/$subdir/scope1.c'::filelocal_ro"] {
gdb_suppress_tests ;
}
--- 131,137 ----
# Print scope1.c::filelocal_ro, which is 202
if {$gcc_compiled} then { setup_xfail "rs6000-*-*" }
! if {$hp_cc_compiler} then { setup_xfail "hppa64-*-*" 11747CLLbs}
if [gdb_test "print 'scope1.c'::filelocal_ro" "\\\$$decimal = 202"
"print 'scope1.c'::filelocal_ro" "No symbol \"scope1.c\" in current
context.*" "print '$srcdir/$subdir/scope1.c'::filelocal_ro"] {
gdb_suppress_tests ;
}
Index: sect-cmd.exp
===================================================================
RCS file: /cvs/cvsfiles/devo/gdb/testsuite/gdb.base/sect-cmd.exp,v
retrieving revision 1.3
diff -c -3 -p -r1.3 sect-cmd.exp
*** sect-cmd.exp 2001/03/26 19:55:27 1.3
--- sect-cmd.exp 2001/12/19 20:41:20
*************** gdb_expect {
*** 76,82 ****
# Reset the section to that same starting address, which should be
# harmless (i.e., we just want to exercise the section command).
#
! if [istarget "hppa2.0w-*-*"] then {
send_gdb "section \.text $address1\n"
gdb_expect {
-re ".*$address1 \- $address2 is .text.*$gdb_prompt $"\
--- 76,82 ----
# Reset the section to that same starting address, which should be
# harmless (i.e., we just want to exercise the section command).
#
! if [istarget "hppa64-*-*"] then {
send_gdb "section \.text $address1\n"
gdb_expect {
-re ".*$address1 \- $address2 is .text.*$gdb_prompt $"\
Index: step-test.exp
===================================================================
RCS file: /cvs/cvsfiles/devo/gdb/testsuite/gdb.base/step-test.exp,v
retrieving revision 1.12
diff -c -3 -p -r1.12 step-test.exp
*** step-test.exp 2001/03/26 19:55:27 1.12
--- step-test.exp 2001/12/19 20:41:20
*************** gdb_test "step" ".*${decimal}.*myglob.*"
*** 78,84 ****
# On PA64, we end up at a different instruction than PA32.
# On IA-64, we also end up on callee instead of on the next line due
# to the restoration of the global pointer (which is a caller-save).
! if { [istarget "hppa2.0w-hp-hpux*"] || [istarget "ia64-*-*"]} {
send_gdb "finish\n"
gdb_expect {
-re ".*${decimal}.*a.*5.*= a.*3.*$gdb_prompt $" { pass "step out 1" }
--- 78,84 ----
# On PA64, we end up at a different instruction than PA32.
# On IA-64, we also end up on callee instead of on the next line due
# to the restoration of the global pointer (which is a caller-save).
! if { [istarget "hppa64-hp-hpux*"] || [istarget "ia64-*-*"]} {
send_gdb "finish\n"
gdb_expect {
-re ".*${decimal}.*a.*5.*= a.*3.*$gdb_prompt $" { pass "step out 1" }
*************** gdb_expect {
*** 176,182 ****
# On PA64, we end up at a different instruction than PA32.
# On IA-64, we end up on callee instead of on the following line due
# to the restoration of the global pointer.
! if { [istarget "hppa2.0w-hp-hpux*"] || [istarget "ia64-*-*"] } {
pass "stepi: finish call 2"
} else {
fail "stepi: finish call 2"
--- 176,182 ----
# On PA64, we end up at a different instruction than PA32.
# On IA-64, we end up on callee instead of on the following line due
# to the restoration of the global pointer.
! if { [istarget "hppa64-hp-hpux*"] || [istarget "ia64-*-*"] } {
pass "stepi: finish call 2"
} else {
fail "stepi: finish call 2"