diff options
305 files changed, 13 insertions, 656 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index f8aaf35..457a628 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,7 @@ +2010-05-05 Joel Brobecker <brobecker@adacore.com> + + Remove the use of prms_id and bug_id throughout the testsuite. + 2010-05-04 Pierre Muller <muller@ics.u-strasbg.fr> PR exp/11349. diff --git a/gdb/testsuite/gdb.arch/alpha-step.exp b/gdb/testsuite/gdb.arch/alpha-step.exp index f0379e0..ba7e0a4 100644 --- a/gdb/testsuite/gdb.arch/alpha-step.exp +++ b/gdb/testsuite/gdb.arch/alpha-step.exp @@ -17,8 +17,6 @@ if $tracelevel { strace $tracelevel } -set prms_id 0 -set bug_id 0 if ![istarget "alpha*-*-*"] then { verbose "Skipping alpha step tests." diff --git a/gdb/testsuite/gdb.arch/altivec-regs.exp b/gdb/testsuite/gdb.arch/altivec-regs.exp index 5df7eeb..80ced43 100644 --- a/gdb/testsuite/gdb.arch/altivec-regs.exp +++ b/gdb/testsuite/gdb.arch/altivec-regs.exp @@ -26,8 +26,6 @@ if $tracelevel then { # This file uses altivec-regs.c for input. # -set prms_id 0 -set bug_id 0 if {![istarget "powerpc*"] || [skip_altivec_tests]} then { verbose "Skipping altivec register tests." diff --git a/gdb/testsuite/gdb.arch/amd64-byte.exp b/gdb/testsuite/gdb.arch/amd64-byte.exp index c76876b..53d1c54 100644 --- a/gdb/testsuite/gdb.arch/amd64-byte.exp +++ b/gdb/testsuite/gdb.arch/amd64-byte.exp @@ -22,8 +22,6 @@ if $tracelevel { strace $tracelevel } -set prms_id 0 -set bug_id 0 if { ![istarget x86_64-*-* ] } { verbose "Skipping amd64 byte register tests." diff --git a/gdb/testsuite/gdb.arch/amd64-disp-step.exp b/gdb/testsuite/gdb.arch/amd64-disp-step.exp index 801bca6..d77f024 100644 --- a/gdb/testsuite/gdb.arch/amd64-disp-step.exp +++ b/gdb/testsuite/gdb.arch/amd64-disp-step.exp @@ -21,8 +21,6 @@ if $tracelevel { strace $tracelevel } -set prms_id 0 -set bug_id 0 if ![istarget "x86_64-*-linux*"] then { verbose "Skipping x86_64 displaced stepping tests." diff --git a/gdb/testsuite/gdb.arch/amd64-dword.exp b/gdb/testsuite/gdb.arch/amd64-dword.exp index f3ab6b9..4d0a6b7 100644 --- a/gdb/testsuite/gdb.arch/amd64-dword.exp +++ b/gdb/testsuite/gdb.arch/amd64-dword.exp @@ -22,8 +22,6 @@ if $tracelevel { strace $tracelevel } -set prms_id 0 -set bug_id 0 if { ![istarget x86_64-*-* ] } { verbose "Skipping amd64 dword register tests." diff --git a/gdb/testsuite/gdb.arch/amd64-word.exp b/gdb/testsuite/gdb.arch/amd64-word.exp index a02edf9..04448d7 100644 --- a/gdb/testsuite/gdb.arch/amd64-word.exp +++ b/gdb/testsuite/gdb.arch/amd64-word.exp @@ -22,8 +22,6 @@ if $tracelevel { strace $tracelevel } -set prms_id 0 -set bug_id 0 if { ![istarget x86_64-*-* ] } { verbose "Skipping amd64 word register tests." diff --git a/gdb/testsuite/gdb.arch/e500-abi.exp b/gdb/testsuite/gdb.arch/e500-abi.exp index d746885..bd2e873 100644 --- a/gdb/testsuite/gdb.arch/e500-abi.exp +++ b/gdb/testsuite/gdb.arch/e500-abi.exp @@ -25,8 +25,6 @@ if $tracelevel then { # This file uses e500-abi.c for input. # -set prms_id 0 -set bug_id 0 if ![istarget "powerpc-*eabispe"] then { verbose "Skipping e500 abi tests." diff --git a/gdb/testsuite/gdb.arch/e500-prologue.exp b/gdb/testsuite/gdb.arch/e500-prologue.exp index 70aa58a..4c47991 100644 --- a/gdb/testsuite/gdb.arch/e500-prologue.exp +++ b/gdb/testsuite/gdb.arch/e500-prologue.exp @@ -21,8 +21,6 @@ if $tracelevel { # Test PowerPC E500 prologue analyzer. -set prms_id 0 -set bug_id 0 if ![istarget "powerpc-*"] then { verbose "Skipping powerpc E500 prologue tests." diff --git a/gdb/testsuite/gdb.arch/e500-regs.exp b/gdb/testsuite/gdb.arch/e500-regs.exp index 4009932..eed96e6 100644 --- a/gdb/testsuite/gdb.arch/e500-regs.exp +++ b/gdb/testsuite/gdb.arch/e500-regs.exp @@ -25,8 +25,6 @@ if $tracelevel then { # This file uses e500-regs.c for input. # -set prms_id 0 -set bug_id 0 if ![istarget "powerpc-*eabispe"] then { verbose "Skipping e500 register tests." diff --git a/gdb/testsuite/gdb.arch/gdb1291.exp b/gdb/testsuite/gdb.arch/gdb1291.exp index 5758b74..cbb36be 100644 --- a/gdb/testsuite/gdb.arch/gdb1291.exp +++ b/gdb/testsuite/gdb.arch/gdb1291.exp @@ -27,8 +27,6 @@ if $tracelevel { # Test SH backtraces with >256 byte frame stack. (PR:1291) -set prms_id 0 -set bug_id 0 if ![istarget "sh-*-*"] then { verbose "Skipping SH backtrace tests." diff --git a/gdb/testsuite/gdb.arch/gdb1431.exp b/gdb/testsuite/gdb.arch/gdb1431.exp index 0061770..3faa195 100644 --- a/gdb/testsuite/gdb.arch/gdb1431.exp +++ b/gdb/testsuite/gdb.arch/gdb1431.exp @@ -29,8 +29,6 @@ if $tracelevel { # Observe that the until command doesn't go all the way to sub2. -set prms_id 0 -set bug_id 0 if ![istarget "sh-*-*"] then { verbose "Skipping SH backtrace tests." diff --git a/gdb/testsuite/gdb.arch/gdb1558.exp b/gdb/testsuite/gdb.arch/gdb1558.exp index 19dbada..981054e 100644 --- a/gdb/testsuite/gdb.arch/gdb1558.exp +++ b/gdb/testsuite/gdb.arch/gdb1558.exp @@ -25,8 +25,6 @@ if $tracelevel { strace $tracelevel } -set prms_id 0 -set bug_id 0 if ![istarget "sh-*-*"] then { verbose "Skipping SH breakpoint test." diff --git a/gdb/testsuite/gdb.arch/i386-avx.exp b/gdb/testsuite/gdb.arch/i386-avx.exp index 561ddef..426e9d3 100644 --- a/gdb/testsuite/gdb.arch/i386-avx.exp +++ b/gdb/testsuite/gdb.arch/i386-avx.exp @@ -22,8 +22,6 @@ if $tracelevel { strace $tracelevel } -set prms_id 0 -set bug_id 0 if { ![istarget i?86-*-*] && ![istarget x86_64-*-* ] } { verbose "Skipping x86 AVX tests." diff --git a/gdb/testsuite/gdb.arch/i386-byte.exp b/gdb/testsuite/gdb.arch/i386-byte.exp index 865257d..d4dd5a5 100644 --- a/gdb/testsuite/gdb.arch/i386-byte.exp +++ b/gdb/testsuite/gdb.arch/i386-byte.exp @@ -22,8 +22,6 @@ if $tracelevel { strace $tracelevel } -set prms_id 0 -set bug_id 0 if { ![istarget i?86-*-*] } { verbose "Skipping i386 byte register tests." diff --git a/gdb/testsuite/gdb.arch/i386-disp-step.exp b/gdb/testsuite/gdb.arch/i386-disp-step.exp index 5628d72..41f39cf 100644 --- a/gdb/testsuite/gdb.arch/i386-disp-step.exp +++ b/gdb/testsuite/gdb.arch/i386-disp-step.exp @@ -21,8 +21,6 @@ if $tracelevel { strace $tracelevel } -set prms_id 0 -set bug_id 0 if ![istarget "i?86-*-linux*"] then { verbose "Skipping x86 displaced stepping tests." diff --git a/gdb/testsuite/gdb.arch/i386-gnu-cfi.exp b/gdb/testsuite/gdb.arch/i386-gnu-cfi.exp index 7567a57..fac9e11 100644 --- a/gdb/testsuite/gdb.arch/i386-gnu-cfi.exp +++ b/gdb/testsuite/gdb.arch/i386-gnu-cfi.exp @@ -26,8 +26,6 @@ if $tracelevel { # Test i386 unwinder. -set prms_id 0 -set bug_id 0 if ![istarget "i?86-*-*"] then { verbose "Skipping i386 unwinder tests." diff --git a/gdb/testsuite/gdb.arch/i386-prologue.exp b/gdb/testsuite/gdb.arch/i386-prologue.exp index 265996a..03c1b17 100644 --- a/gdb/testsuite/gdb.arch/i386-prologue.exp +++ b/gdb/testsuite/gdb.arch/i386-prologue.exp @@ -25,8 +25,6 @@ if $tracelevel { # Test i386 prologue analyzer. -set prms_id 0 -set bug_id 0 if ![istarget "i?86-*-*"] then { verbose "Skipping i386 prologue tests." diff --git a/gdb/testsuite/gdb.arch/i386-sse.exp b/gdb/testsuite/gdb.arch/i386-sse.exp index 50495b1..72a8fb2 100644 --- a/gdb/testsuite/gdb.arch/i386-sse.exp +++ b/gdb/testsuite/gdb.arch/i386-sse.exp @@ -22,8 +22,6 @@ if $tracelevel { strace $tracelevel } -set prms_id 0 -set bug_id 0 if { ![istarget i?86-*-*] && ![istarget x86_64-*-* ] } { verbose "Skipping x86 SSE tests." diff --git a/gdb/testsuite/gdb.arch/i386-unwind.exp b/gdb/testsuite/gdb.arch/i386-unwind.exp index d51e598..ac96683 100644 --- a/gdb/testsuite/gdb.arch/i386-unwind.exp +++ b/gdb/testsuite/gdb.arch/i386-unwind.exp @@ -24,8 +24,6 @@ if $tracelevel { # Test i386 unwinder. -set prms_id 0 -set bug_id 0 if ![istarget "i?86-*-*"] then { verbose "Skipping i386 unwinder tests." diff --git a/gdb/testsuite/gdb.arch/i386-word.exp b/gdb/testsuite/gdb.arch/i386-word.exp index 73f3b59..a178fed 100644 --- a/gdb/testsuite/gdb.arch/i386-word.exp +++ b/gdb/testsuite/gdb.arch/i386-word.exp @@ -22,8 +22,6 @@ if $tracelevel { strace $tracelevel } -set prms_id 0 -set bug_id 0 if { ![istarget i?86-*-*] } { verbose "Skipping i386 word register tests." diff --git a/gdb/testsuite/gdb.arch/pa-nullify.exp b/gdb/testsuite/gdb.arch/pa-nullify.exp index bac72b4..a9028a3 100644 --- a/gdb/testsuite/gdb.arch/pa-nullify.exp +++ b/gdb/testsuite/gdb.arch/pa-nullify.exp @@ -19,8 +19,6 @@ if $tracelevel { strace $tracelevel } -set prms_id 0 -set bug_id 0 # Test handling of nullified instructions for the pa target. diff --git a/gdb/testsuite/gdb.arch/powerpc-aix-prologue.exp b/gdb/testsuite/gdb.arch/powerpc-aix-prologue.exp index 9d99df2..9aea55e 100644 --- a/gdb/testsuite/gdb.arch/powerpc-aix-prologue.exp +++ b/gdb/testsuite/gdb.arch/powerpc-aix-prologue.exp @@ -21,8 +21,6 @@ if $tracelevel { # Test rs6000 prologue analyzer. -set prms_id 0 -set bug_id 0 if ![istarget "powerpc-*-aix*"] then { verbose "Skipping powerpc-aix prologue tests." diff --git a/gdb/testsuite/gdb.arch/ppc64-atomic-inst.exp b/gdb/testsuite/gdb.arch/ppc64-atomic-inst.exp index 51da9d4..c31c280c3 100644 --- a/gdb/testsuite/gdb.arch/ppc64-atomic-inst.exp +++ b/gdb/testsuite/gdb.arch/ppc64-atomic-inst.exp @@ -24,8 +24,6 @@ if $tracelevel { # a lwarx/ldarx instruction and ending with a stwcx/stdcx # instruction. -set prms_id 0 -set bug_id 0 if ![istarget "powerpc64-*"] then { verbose "Skipping testing of powerpc64 single stepping over atomic sequences." diff --git a/gdb/testsuite/gdb.arch/spu-info.exp b/gdb/testsuite/gdb.arch/spu-info.exp index 69afd36..b3d41e1 100644 --- a/gdb/testsuite/gdb.arch/spu-info.exp +++ b/gdb/testsuite/gdb.arch/spu-info.exp @@ -18,8 +18,6 @@ # Contributed by Markus Deuling <deuling@de.ibm.com>. # Tests for 'info spu' commands. -set prms_id 0 -set bug_id 0 if { ![istarget "spu-*-elf"] } then { verbose "Skipping SPU-only testcase" diff --git a/gdb/testsuite/gdb.arch/system-gcore.exp b/gdb/testsuite/gdb.arch/system-gcore.exp index 9c8c911..3a86c4b 100644 --- a/gdb/testsuite/gdb.arch/system-gcore.exp +++ b/gdb/testsuite/gdb.arch/system-gcore.exp @@ -18,8 +18,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 if { ![istarget i?86-*-linux*] && ![istarget x86_64-*-linux* ] } { verbose "Skipping system register gcore tests." diff --git a/gdb/testsuite/gdb.arch/vsx-regs.exp b/gdb/testsuite/gdb.arch/vsx-regs.exp index 2e2ca11..f310a6f 100644 --- a/gdb/testsuite/gdb.arch/vsx-regs.exp +++ b/gdb/testsuite/gdb.arch/vsx-regs.exp @@ -24,8 +24,6 @@ if $tracelevel then { # Test the use of VSX registers, for Powerpc. # -set prms_id 0 -set bug_id 0 if {![istarget "powerpc*"] || [skip_vsx_tests]} then { verbose "Skipping vsx register tests." diff --git a/gdb/testsuite/gdb.asm/asm-source.exp b/gdb/testsuite/gdb.asm/asm-source.exp index 615182f..3abe1ed 100644 --- a/gdb/testsuite/gdb.asm/asm-source.exp +++ b/gdb/testsuite/gdb.asm/asm-source.exp @@ -25,8 +25,6 @@ if $tracelevel then { # This file uses asmsrc[12].s for input. # -set prms_id 0 -set bug_id 0 set asm-arch "" set asm-note "empty" diff --git a/gdb/testsuite/gdb.base/a2-run.exp b/gdb/testsuite/gdb.base/a2-run.exp index 0aaebda..7cc05fa 100644 --- a/gdb/testsuite/gdb.base/a2-run.exp +++ b/gdb/testsuite/gdb.base/a2-run.exp @@ -28,8 +28,6 @@ if $tracelevel then { # # test running programs # -set prms_id 0 -set bug_id 0 set testfile a2-run if { [prepare_for_testing ${testfile}.exp $testfile run.c] } { diff --git a/gdb/testsuite/gdb.base/all-bin.exp b/gdb/testsuite/gdb.base/all-bin.exp index 4d6dd5c..b73c3aa 100644 --- a/gdb/testsuite/gdb.base/all-bin.exp +++ b/gdb/testsuite/gdb.base/all-bin.exp @@ -30,8 +30,6 @@ if $tracelevel then { # # test running programs # -set prms_id 0 -set bug_id 0 set testfile "all-types" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/annota1.exp b/gdb/testsuite/gdb.base/annota1.exp index 6fac1cd..241d46b 100644 --- a/gdb/testsuite/gdb.base/annota1.exp +++ b/gdb/testsuite/gdb.base/annota1.exp @@ -34,8 +34,6 @@ if [is_remote target] then { # # test running programs # -set prms_id 0 -set bug_id 0 set testfile "annota1" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/annota3.exp b/gdb/testsuite/gdb.base/annota3.exp index eb15d27..e8b0657 100644 --- a/gdb/testsuite/gdb.base/annota3.exp +++ b/gdb/testsuite/gdb.base/annota3.exp @@ -34,8 +34,6 @@ if [is_remote target] then { # # test running programs # -set prms_id 0 -set bug_id 0 set testfile "annota3" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/arithmet.exp b/gdb/testsuite/gdb.base/arithmet.exp index 135de86..93a8e32 100644 --- a/gdb/testsuite/gdb.base/arithmet.exp +++ b/gdb/testsuite/gdb.base/arithmet.exp @@ -30,8 +30,6 @@ if $tracelevel then { # # test running programs # -set prms_id 0 -set bug_id 0 set testfile "int-type" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/assign.exp b/gdb/testsuite/gdb.base/assign.exp index 50ce6f3..4eda7d6 100644 --- a/gdb/testsuite/gdb.base/assign.exp +++ b/gdb/testsuite/gdb.base/assign.exp @@ -28,8 +28,6 @@ if $tracelevel then { # # test running programs # -set prms_id 0 -set bug_id 0 set testfile "all-types" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/async.exp b/gdb/testsuite/gdb.base/async.exp index 2718591..6b67723 100644 --- a/gdb/testsuite/gdb.base/async.exp +++ b/gdb/testsuite/gdb.base/async.exp @@ -21,8 +21,6 @@ if $tracelevel then { # # test running programs # -set prms_id 0 -set bug_id 0 set testfile "async" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/attach.exp b/gdb/testsuite/gdb.base/attach.exp index a507e3b..b19e74b 100644 --- a/gdb/testsuite/gdb.base/attach.exp +++ b/gdb/testsuite/gdb.base/attach.exp @@ -18,8 +18,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 # On HP-UX 11.0, this test is causing a process running the program # "attach" to be left around spinning. Until we figure out why, I am diff --git a/gdb/testsuite/gdb.base/auxv.exp b/gdb/testsuite/gdb.base/auxv.exp index 04f2dd8..18547b5 100644 --- a/gdb/testsuite/gdb.base/auxv.exp +++ b/gdb/testsuite/gdb.base/auxv.exp @@ -29,8 +29,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile "auxv" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/bigcore.exp b/gdb/testsuite/gdb.base/bigcore.exp index 9bdd7c0..c60900e 100644 --- a/gdb/testsuite/gdb.base/bigcore.exp +++ b/gdb/testsuite/gdb.base/bigcore.exp @@ -21,8 +21,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 # Are we on a target board? As of 2004-02-12, GDB didn't have a # mechanism that would let it efficiently access a remote corefile. diff --git a/gdb/testsuite/gdb.base/bitfields.exp b/gdb/testsuite/gdb.base/bitfields.exp index f96d1df..1a8e142 100644 --- a/gdb/testsuite/gdb.base/bitfields.exp +++ b/gdb/testsuite/gdb.base/bitfields.exp @@ -20,8 +20,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile "bitfields" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/bitfields2.exp b/gdb/testsuite/gdb.base/bitfields2.exp index 9e4c180..68ab3a9 100644 --- a/gdb/testsuite/gdb.base/bitfields2.exp +++ b/gdb/testsuite/gdb.base/bitfields2.exp @@ -27,8 +27,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile "bitfields2" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/bitops.exp b/gdb/testsuite/gdb.base/bitops.exp index a5027d4e..634d4a6 100644 --- a/gdb/testsuite/gdb.base/bitops.exp +++ b/gdb/testsuite/gdb.base/bitops.exp @@ -30,8 +30,6 @@ if $tracelevel then { # # test running programs # -set prms_id 0 -set bug_id 0 gdb_exit diff --git a/gdb/testsuite/gdb.base/call-ar-st.exp b/gdb/testsuite/gdb.base/call-ar-st.exp index 40ed86c..763c509 100644 --- a/gdb/testsuite/gdb.base/call-ar-st.exp +++ b/gdb/testsuite/gdb.base/call-ar-st.exp @@ -21,8 +21,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile "call-ar-st" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/call-rt-st.exp b/gdb/testsuite/gdb.base/call-rt-st.exp index f339de5..593b375 100644 --- a/gdb/testsuite/gdb.base/call-rt-st.exp +++ b/gdb/testsuite/gdb.base/call-rt-st.exp @@ -25,8 +25,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile "call-rt-st" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/call-sc.exp b/gdb/testsuite/gdb.base/call-sc.exp index 954c5d1..3a8dd33 100644 --- a/gdb/testsuite/gdb.base/call-sc.exp +++ b/gdb/testsuite/gdb.base/call-sc.exp @@ -22,8 +22,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 # Some targets can't call functions, so don't even bother with this # test. diff --git a/gdb/testsuite/gdb.base/call-signal-resume.exp b/gdb/testsuite/gdb.base/call-signal-resume.exp index bc2b582..58a12c0 100644 --- a/gdb/testsuite/gdb.base/call-signal-resume.exp +++ b/gdb/testsuite/gdb.base/call-signal-resume.exp @@ -34,8 +34,6 @@ if [target_info exists gdb,nosignals] { continue } -set prms_id 0 -set bug_id 0 set testfile "call-signals" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/call-strs.exp b/gdb/testsuite/gdb.base/call-strs.exp index e03b881..6a84ea4 100644 --- a/gdb/testsuite/gdb.base/call-strs.exp +++ b/gdb/testsuite/gdb.base/call-strs.exp @@ -27,8 +27,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile "call-strs" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/callexit.exp b/gdb/testsuite/gdb.base/callexit.exp index 11fc8c1..02f55ca 100644 --- a/gdb/testsuite/gdb.base/callexit.exp +++ b/gdb/testsuite/gdb.base/callexit.exp @@ -17,8 +17,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile "callexit" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/callfuncs.exp b/gdb/testsuite/gdb.base/callfuncs.exp index 2f175e0..f7fc641 100644 --- a/gdb/testsuite/gdb.base/callfuncs.exp +++ b/gdb/testsuite/gdb.base/callfuncs.exp @@ -21,8 +21,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile "callfuncs" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/catch-syscall.exp b/gdb/testsuite/gdb.base/catch-syscall.exp index ee385ad..ca6f3fd 100644 --- a/gdb/testsuite/gdb.base/catch-syscall.exp +++ b/gdb/testsuite/gdb.base/catch-syscall.exp @@ -23,8 +23,6 @@ if { [is_remote target] || ![isnative] } then { continue } -set prms_id 0 -set bug_id 0 global srcfile set testfile "catch-syscall" diff --git a/gdb/testsuite/gdb.base/charset.exp b/gdb/testsuite/gdb.base/charset.exp index 8d1d6543..45595ff 100644 --- a/gdb/testsuite/gdb.base/charset.exp +++ b/gdb/testsuite/gdb.base/charset.exp @@ -24,8 +24,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile "charset" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/checkpoint.exp b/gdb/testsuite/gdb.base/checkpoint.exp index d987348..650591c 100644 --- a/gdb/testsuite/gdb.base/checkpoint.exp +++ b/gdb/testsuite/gdb.base/checkpoint.exp @@ -28,8 +28,6 @@ if {![istarget "*-*-linux*"]} then { continue } -set prms_id 0 -set bug_id 0 set testfile "checkpoint" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/chng-syms.exp b/gdb/testsuite/gdb.base/chng-syms.exp index 3879868..7ed31e9 100644 --- a/gdb/testsuite/gdb.base/chng-syms.exp +++ b/gdb/testsuite/gdb.base/chng-syms.exp @@ -22,8 +22,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 # IDT/SIM apparently doesn't have enough file descriptors to allow the # problem checked by this test to occur. diff --git a/gdb/testsuite/gdb.base/code-expr.exp b/gdb/testsuite/gdb.base/code-expr.exp index 689d562..37b15cf 100644 --- a/gdb/testsuite/gdb.base/code-expr.exp +++ b/gdb/testsuite/gdb.base/code-expr.exp @@ -25,8 +25,6 @@ if $tracelevel then { # # test running programs # -set prms_id 0 -set bug_id 0 set testfile "cvexpr" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/commands.exp b/gdb/testsuite/gdb.base/commands.exp index bc81f06..42bd89b 100644 --- a/gdb/testsuite/gdb.base/commands.exp +++ b/gdb/testsuite/gdb.base/commands.exp @@ -22,8 +22,6 @@ if $tracelevel then { # # test special commands (if, while, etc) # -set prms_id 0 -set bug_id 0 if { [prepare_for_testing commands.exp commands run.c {debug additional_flags=-DFAKEARGV}] } { return -1 diff --git a/gdb/testsuite/gdb.base/completion.exp b/gdb/testsuite/gdb.base/completion.exp index 5f836b6..5c91631 100644 --- a/gdb/testsuite/gdb.base/completion.exp +++ b/gdb/testsuite/gdb.base/completion.exp @@ -56,8 +56,6 @@ global usestubs # # test running programs # -set prms_id 0 -set bug_id 0 set testfile "break" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/complex.exp b/gdb/testsuite/gdb.base/complex.exp index 38128e8..27af703 100644 --- a/gdb/testsuite/gdb.base/complex.exp +++ b/gdb/testsuite/gdb.base/complex.exp @@ -17,7 +17,6 @@ if $tracelevel then { strace $tracelevel } -set bug_id 0 set testfile complex set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/condbreak.exp b/gdb/testsuite/gdb.base/condbreak.exp index 4a23b2f..ea4e0ba 100644 --- a/gdb/testsuite/gdb.base/condbreak.exp +++ b/gdb/testsuite/gdb.base/condbreak.exp @@ -27,8 +27,6 @@ global usestubs # # test running programs # -set prms_id 0 -set bug_id 0 set testfile "break" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/consecutive.exp b/gdb/testsuite/gdb.base/consecutive.exp index 473831a..b8850f0 100644 --- a/gdb/testsuite/gdb.base/consecutive.exp +++ b/gdb/testsuite/gdb.base/consecutive.exp @@ -23,8 +23,6 @@ if $tracelevel then { # Test breakpoints at consecutive instruction addresses. # -set prms_id 0 -set bug_id 0 set testfile "consecutive" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/constvars.exp b/gdb/testsuite/gdb.base/constvars.exp index 5771295..efd8170 100644 --- a/gdb/testsuite/gdb.base/constvars.exp +++ b/gdb/testsuite/gdb.base/constvars.exp @@ -31,8 +31,6 @@ if $tracelevel then { # # test running programs # -set prms_id 0 -set bug_id 0 set testfile "constvars" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/corefile.exp b/gdb/testsuite/gdb.base/corefile.exp index d668f0d..b756cbb 100644 --- a/gdb/testsuite/gdb.base/corefile.exp +++ b/gdb/testsuite/gdb.base/corefile.exp @@ -20,8 +20,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 # are we on a target board if ![isnative] then { diff --git a/gdb/testsuite/gdb.base/cursal.exp b/gdb/testsuite/gdb.base/cursal.exp index 69f864a..0748998 100644 --- a/gdb/testsuite/gdb.base/cursal.exp +++ b/gdb/testsuite/gdb.base/cursal.exp @@ -17,8 +17,6 @@ if $tracelevel { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile "cursal" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/cvexpr.exp b/gdb/testsuite/gdb.base/cvexpr.exp index 1777159..89f1640 100644 --- a/gdb/testsuite/gdb.base/cvexpr.exp +++ b/gdb/testsuite/gdb.base/cvexpr.exp @@ -25,8 +25,6 @@ if $tracelevel then { # # test running programs # -set prms_id 0 -set bug_id 0 set testfile "cvexpr" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/define.exp b/gdb/testsuite/gdb.base/define.exp index 3a472a7..92209b4 100644 --- a/gdb/testsuite/gdb.base/define.exp +++ b/gdb/testsuite/gdb.base/define.exp @@ -26,8 +26,6 @@ global usestubs # # test running programs # -set prms_id 0 -set bug_id 0 set testfile "break" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/del.exp b/gdb/testsuite/gdb.base/del.exp index 380e706..6201e9e 100644 --- a/gdb/testsuite/gdb.base/del.exp +++ b/gdb/testsuite/gdb.base/del.exp @@ -20,8 +20,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile del set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/detach.exp b/gdb/testsuite/gdb.base/detach.exp index 47b83ad..5326a60 100644 --- a/gdb/testsuite/gdb.base/detach.exp +++ b/gdb/testsuite/gdb.base/detach.exp @@ -20,8 +20,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 # Only GNU/Linux is known to support this. if { ! [istarget "*-*-linux*"] } { diff --git a/gdb/testsuite/gdb.base/dump.exp b/gdb/testsuite/gdb.base/dump.exp index bc992dc..624c7e3 100644 --- a/gdb/testsuite/gdb.base/dump.exp +++ b/gdb/testsuite/gdb.base/dump.exp @@ -20,8 +20,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile "dump" diff --git a/gdb/testsuite/gdb.base/echo.exp b/gdb/testsuite/gdb.base/echo.exp index 5d39ae5..7c0b4dc 100644 --- a/gdb/testsuite/gdb.base/echo.exp +++ b/gdb/testsuite/gdb.base/echo.exp @@ -27,15 +27,4 @@ if $tracelevel then { # test the echo command # -# this sets the prms id number. This is the number that will appear -# on all the output logs. -# ex: set prms_id 643 -set prms_id 0 - -# this sets the bug id id. This is the number that will appear -# on all the output logs. This is optional and if it is not set -# it will appear on all output logs as a 0. -# ex: set bug_id 12 -set bug_id 0 - gdb_test "echo Hello world!\\n" "Hello world!" "Echo test" diff --git a/gdb/testsuite/gdb.base/ena-dis-br.exp b/gdb/testsuite/gdb.base/ena-dis-br.exp index 3bc3ecc..f7ef713 100644 --- a/gdb/testsuite/gdb.base/ena-dis-br.exp +++ b/gdb/testsuite/gdb.base/ena-dis-br.exp @@ -25,8 +25,6 @@ global usestubs # # test running programs # -set prms_id 0 -set bug_id 0 set testfile "break" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/environ.exp b/gdb/testsuite/gdb.base/environ.exp index c687086..c8c8679 100644 --- a/gdb/testsuite/gdb.base/environ.exp +++ b/gdb/testsuite/gdb.base/environ.exp @@ -23,8 +23,6 @@ global usestubs # # test running programs # -set prms_id 0 -set bug_id 0 # This test exists solely to exercise the "environment" commands for # code-coverage on HP-UX. diff --git a/gdb/testsuite/gdb.base/exprs.exp b/gdb/testsuite/gdb.base/exprs.exp index 6c0b12c..4841ecc 100644 --- a/gdb/testsuite/gdb.base/exprs.exp +++ b/gdb/testsuite/gdb.base/exprs.exp @@ -23,8 +23,6 @@ if $tracelevel { # # test running programs # -set prms_id 0 -set bug_id 0 set testfile "exprs" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/fileio.exp b/gdb/testsuite/gdb.base/fileio.exp index 494e182..2a2e0ae 100644 --- a/gdb/testsuite/gdb.base/fileio.exp +++ b/gdb/testsuite/gdb.base/fileio.exp @@ -25,8 +25,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile "fileio" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/finish.exp b/gdb/testsuite/gdb.base/finish.exp index 29eaf91..9b6b5f9 100644 --- a/gdb/testsuite/gdb.base/finish.exp +++ b/gdb/testsuite/gdb.base/finish.exp @@ -19,8 +19,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 # re-use the program from the "return2" test. if { [prepare_for_testing finish.exp finish return2.c] } { diff --git a/gdb/testsuite/gdb.base/fixsection.exp b/gdb/testsuite/gdb.base/fixsection.exp index 9cf76ee..ed310f5 100644 --- a/gdb/testsuite/gdb.base/fixsection.exp +++ b/gdb/testsuite/gdb.base/fixsection.exp @@ -17,8 +17,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 if {[skip_shlib_tests]} { return 0 diff --git a/gdb/testsuite/gdb.base/float.exp b/gdb/testsuite/gdb.base/float.exp index e9be286..4de471d 100644 --- a/gdb/testsuite/gdb.base/float.exp +++ b/gdb/testsuite/gdb.base/float.exp @@ -26,8 +26,6 @@ if $tracelevel { # Test floating-point related functionality. # -set prms_id 0 -set bug_id 0 if { [prepare_for_testing float.exp float run.c] } { return -1 diff --git a/gdb/testsuite/gdb.base/foll-exec.exp b/gdb/testsuite/gdb.base/foll-exec.exp index 393b12b..92fd105 100644 --- a/gdb/testsuite/gdb.base/foll-exec.exp +++ b/gdb/testsuite/gdb.base/foll-exec.exp @@ -18,8 +18,6 @@ if { [is_remote target] || ![isnative] } then { continue } -set prms_id 0 -set bug_id 0 set testfile "foll-exec" set testfile2 "execd-prog" diff --git a/gdb/testsuite/gdb.base/foll-fork.exp b/gdb/testsuite/gdb.base/foll-fork.exp index 03603dc..e3de7f3 100644 --- a/gdb/testsuite/gdb.base/foll-fork.exp +++ b/gdb/testsuite/gdb.base/foll-fork.exp @@ -18,8 +18,6 @@ if { [is_remote target] || ![isnative] } then { continue } -set prms_id 0 -set bug_id 0 global srcfile set testfile "foll-fork" diff --git a/gdb/testsuite/gdb.base/foll-vfork.exp b/gdb/testsuite/gdb.base/foll-vfork.exp index dd633c3..4813d2e 100644 --- a/gdb/testsuite/gdb.base/foll-vfork.exp +++ b/gdb/testsuite/gdb.base/foll-vfork.exp @@ -18,8 +18,6 @@ if { [is_remote target] || ![isnative] } then { continue } -set prms_id 0 -set bug_id 0 # NOTE drow/2002-12-06: I don't know what the referenced kernel problem # is, but it appears to be fixed in recent HP/UX versions. diff --git a/gdb/testsuite/gdb.base/freebpcmd.exp b/gdb/testsuite/gdb.base/freebpcmd.exp index 3b46887..cbc31be 100644 --- a/gdb/testsuite/gdb.base/freebpcmd.exp +++ b/gdb/testsuite/gdb.base/freebpcmd.exp @@ -43,8 +43,6 @@ # reproduction recipe is more delicate than I would like. I welcome # suggestions for improving this. -set prms_id 0 -set bug_id 0 set testfile "freebpcmd" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/funcargs.exp b/gdb/testsuite/gdb.base/funcargs.exp index 4f0f25f..6e7dea3 100644 --- a/gdb/testsuite/gdb.base/funcargs.exp +++ b/gdb/testsuite/gdb.base/funcargs.exp @@ -20,8 +20,6 @@ if $tracelevel { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile "funcargs" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/gcore-buffer-overflow.exp b/gdb/testsuite/gdb.base/gcore-buffer-overflow.exp index b302a3b..e412a20 100644 --- a/gdb/testsuite/gdb.base/gcore-buffer-overflow.exp +++ b/gdb/testsuite/gdb.base/gcore-buffer-overflow.exp @@ -19,8 +19,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile "gcore-buffer-overflow" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/gcore.exp b/gdb/testsuite/gdb.base/gcore.exp index ee20284..fd69db7 100644 --- a/gdb/testsuite/gdb.base/gcore.exp +++ b/gdb/testsuite/gdb.base/gcore.exp @@ -21,8 +21,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile "gcore" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/gdb1056.exp b/gdb/testsuite/gdb.base/gdb1056.exp index fe69da1..3dfed5a 100644 --- a/gdb/testsuite/gdb.base/gdb1056.exp +++ b/gdb/testsuite/gdb.base/gdb1056.exp @@ -22,8 +22,6 @@ if $tracelevel then { # test SIGFPE (such as division by 0) inside gdb itself -set prms_id 0 -set bug_id 0 gdb_start diff --git a/gdb/testsuite/gdb.base/gdb1090.exp b/gdb/testsuite/gdb.base/gdb1090.exp index 049dcc4..d8a7ca1 100644 --- a/gdb/testsuite/gdb.base/gdb1090.exp +++ b/gdb/testsuite/gdb.base/gdb1090.exp @@ -25,8 +25,6 @@ if $tracelevel then { # # test running programs # -set prms_id 0 -set bug_id 0 set testfile "gdb1090" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/gdb11531.exp b/gdb/testsuite/gdb.base/gdb11531.exp index 43748a1..e222036 100644 --- a/gdb/testsuite/gdb.base/gdb11531.exp +++ b/gdb/testsuite/gdb.base/gdb11531.exp @@ -23,8 +23,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile "gdb11531" diff --git a/gdb/testsuite/gdb.base/gdb1250.exp b/gdb/testsuite/gdb.base/gdb1250.exp index 71c883e..0f9f0f3 100644 --- a/gdb/testsuite/gdb.base/gdb1250.exp +++ b/gdb/testsuite/gdb.base/gdb1250.exp @@ -25,8 +25,6 @@ if $tracelevel then { # # test running programs # -set prms_id 0 -set bug_id 0 set testfile "gdb1250" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/gdbvars.exp b/gdb/testsuite/gdb.base/gdbvars.exp index 7db5cc1..9fbae4b 100644 --- a/gdb/testsuite/gdb.base/gdbvars.exp +++ b/gdb/testsuite/gdb.base/gdbvars.exp @@ -20,8 +20,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile "gdbvars" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/hashline1.exp b/gdb/testsuite/gdb.base/hashline1.exp index da837ab..092f68e 100644 --- a/gdb/testsuite/gdb.base/hashline1.exp +++ b/gdb/testsuite/gdb.base/hashline1.exp @@ -15,15 +15,13 @@ # This file is part of the gdb testsuite. -# Test loading of line number information with absolute path in #line, bug 2360. +# Test loading of line number information with absolute path in #line, +# PR symtab/9465. if $tracelevel then { strace $tracelevel } -set prms_id 2360 -set bug_id 0 - # srcfile is in objdir because we need to machine generate it in order # to get the correct path in the #line directive. diff --git a/gdb/testsuite/gdb.base/hashline2.exp b/gdb/testsuite/gdb.base/hashline2.exp index 7d47bd6..0efdfe9 100644 --- a/gdb/testsuite/gdb.base/hashline2.exp +++ b/gdb/testsuite/gdb.base/hashline2.exp @@ -16,15 +16,12 @@ # This file is part of the gdb testsuite. # Test loading of line number information with an absolute path with extra -# /'s in #line, bug 2360. +# /'s in #line, PR symtab/9465. if $tracelevel then { strace $tracelevel } -set prms_id 2360 -set bug_id 0 - # srcfile is in objdir because we need to machine generate it in order # to get the correct path in the #line directive. diff --git a/gdb/testsuite/gdb.base/hashline3.exp b/gdb/testsuite/gdb.base/hashline3.exp index 3f0d957..558db01 100644 --- a/gdb/testsuite/gdb.base/hashline3.exp +++ b/gdb/testsuite/gdb.base/hashline3.exp @@ -15,15 +15,13 @@ # This file is part of the gdb testsuite. -# Test loading of line number information with relative path in #line, bug 2360. +# Test loading of line number information with relative path in #line, +# PR symtab/9465. if $tracelevel then { strace $tracelevel } -set prms_id 2360 -set bug_id 0 - # srcfile is in objdir because we need to machine generate it in order # to get the correct path in the #line directive. diff --git a/gdb/testsuite/gdb.base/help.exp b/gdb/testsuite/gdb.base/help.exp index d9e2053..ab6b611 100644 --- a/gdb/testsuite/gdb.base/help.exp +++ b/gdb/testsuite/gdb.base/help.exp @@ -21,8 +21,6 @@ # test gdb help commands # -set prms_id 0 -set bug_id 0 gdb_start diff --git a/gdb/testsuite/gdb.base/huge.exp b/gdb/testsuite/gdb.base/huge.exp index 2e903b6..89a1945 100644 --- a/gdb/testsuite/gdb.base/huge.exp +++ b/gdb/testsuite/gdb.base/huge.exp @@ -19,8 +19,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 # Define if you want to skip this test # (could be very time-consuming on remote targets with slow connection). diff --git a/gdb/testsuite/gdb.base/info-proc.exp b/gdb/testsuite/gdb.base/info-proc.exp index e360e3e..1591fa2 100644 --- a/gdb/testsuite/gdb.base/info-proc.exp +++ b/gdb/testsuite/gdb.base/info-proc.exp @@ -25,8 +25,6 @@ if { [is_remote target] } then { continue } -set prms_id 0 -set bug_id 0 set ws "\[ \t\]+" diff --git a/gdb/testsuite/gdb.base/info-target.exp b/gdb/testsuite/gdb.base/info-target.exp index d94294a..dc0882c 100644 --- a/gdb/testsuite/gdb.base/info-target.exp +++ b/gdb/testsuite/gdb.base/info-target.exp @@ -17,8 +17,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile info-target if { [prepare_for_testing ${testfile}.exp $testfile start.c] } { diff --git a/gdb/testsuite/gdb.base/interrupt.exp b/gdb/testsuite/gdb.base/interrupt.exp index c907896..5ae911c 100644 --- a/gdb/testsuite/gdb.base/interrupt.exp +++ b/gdb/testsuite/gdb.base/interrupt.exp @@ -28,8 +28,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile interrupt set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/jump.exp b/gdb/testsuite/gdb.base/jump.exp index 6b43d56..8c80a01 100644 --- a/gdb/testsuite/gdb.base/jump.exp +++ b/gdb/testsuite/gdb.base/jump.exp @@ -18,8 +18,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 clear_xfail "*-*-*" diff --git a/gdb/testsuite/gdb.base/langs.exp b/gdb/testsuite/gdb.base/langs.exp index 0eca3f7..3890af7 100644 --- a/gdb/testsuite/gdb.base/langs.exp +++ b/gdb/testsuite/gdb.base/langs.exp @@ -18,8 +18,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile langs set binfile ${objdir}/${subdir}/${testfile} diff --git a/gdb/testsuite/gdb.base/lineinc.exp b/gdb/testsuite/gdb.base/lineinc.exp index 543a526..9509895 100644 --- a/gdb/testsuite/gdb.base/lineinc.exp +++ b/gdb/testsuite/gdb.base/lineinc.exp @@ -81,8 +81,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile "lineinc" set binfile ${objdir}/${subdir}/${testfile} diff --git a/gdb/testsuite/gdb.base/list.exp b/gdb/testsuite/gdb.base/list.exp index 03bb59d..6b93fcf 100644 --- a/gdb/testsuite/gdb.base/list.exp +++ b/gdb/testsuite/gdb.base/list.exp @@ -20,8 +20,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile "list" set binfile ${objdir}/${subdir}/${testfile} diff --git a/gdb/testsuite/gdb.base/logical.exp b/gdb/testsuite/gdb.base/logical.exp index 0c62c14..2a2c070 100644 --- a/gdb/testsuite/gdb.base/logical.exp +++ b/gdb/testsuite/gdb.base/logical.exp @@ -29,8 +29,6 @@ if $tracelevel then { # # test running programs # -set prms_id 0 -set bug_id 0 set testfile "int-type" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/longjmp.exp b/gdb/testsuite/gdb.base/longjmp.exp index d09be12..1e9dc12 100644 --- a/gdb/testsuite/gdb.base/longjmp.exp +++ b/gdb/testsuite/gdb.base/longjmp.exp @@ -21,8 +21,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile "longjmp" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/macscp.exp b/gdb/testsuite/gdb.base/macscp.exp index ec8c78c..ed39bf4 100644 --- a/gdb/testsuite/gdb.base/macscp.exp +++ b/gdb/testsuite/gdb.base/macscp.exp @@ -18,8 +18,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set srcfile macscp1.c set testfile "macscp" diff --git a/gdb/testsuite/gdb.base/maint.exp b/gdb/testsuite/gdb.base/maint.exp index 4969c67..11f4ba4 100644 --- a/gdb/testsuite/gdb.base/maint.exp +++ b/gdb/testsuite/gdb.base/maint.exp @@ -57,8 +57,6 @@ global usestubs # # test running programs # -set prms_id 0 -set bug_id 0 set testfile "break" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/mips_pro.exp b/gdb/testsuite/gdb.base/mips_pro.exp index db012c2..8c1ad1a 100644 --- a/gdb/testsuite/gdb.base/mips_pro.exp +++ b/gdb/testsuite/gdb.base/mips_pro.exp @@ -18,8 +18,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile mips_pro set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/miscexprs.exp b/gdb/testsuite/gdb.base/miscexprs.exp index 52888a2..b4df1b1 100644 --- a/gdb/testsuite/gdb.base/miscexprs.exp +++ b/gdb/testsuite/gdb.base/miscexprs.exp @@ -41,8 +41,6 @@ set additional_flags "additional_flags=${storage}" # # test running programs # -set prms_id 0 -set bug_id 0 set testfile "miscexprs" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/multi-forks.exp b/gdb/testsuite/gdb.base/multi-forks.exp index 9fbff40..feb7af1 100644 --- a/gdb/testsuite/gdb.base/multi-forks.exp +++ b/gdb/testsuite/gdb.base/multi-forks.exp @@ -29,8 +29,6 @@ if {![istarget "hppa*-hp-hpux*"] && ![istarget "*-*-linux*"]} then { continue } -set prms_id 0 -set bug_id 0 set testfile "multi-forks" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/nodebug.exp b/gdb/testsuite/gdb.base/nodebug.exp index 4666316..bc7cf52 100644 --- a/gdb/testsuite/gdb.base/nodebug.exp +++ b/gdb/testsuite/gdb.base/nodebug.exp @@ -20,8 +20,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile nodebug set srcfile $srcdir/$subdir/$testfile.c diff --git a/gdb/testsuite/gdb.base/opaque.exp b/gdb/testsuite/gdb.base/opaque.exp index 54b6881..39b6814 100644 --- a/gdb/testsuite/gdb.base/opaque.exp +++ b/gdb/testsuite/gdb.base/opaque.exp @@ -20,8 +20,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile "opaque" set binfile ${objdir}/${subdir}/opaque diff --git a/gdb/testsuite/gdb.base/overlays.exp b/gdb/testsuite/gdb.base/overlays.exp index c75d111..a18f08f 100644 --- a/gdb/testsuite/gdb.base/overlays.exp +++ b/gdb/testsuite/gdb.base/overlays.exp @@ -24,8 +24,6 @@ if $tracelevel then { # test running programs # -set prms_id 0 -set bug_id 0 set data_overlays 1 diff --git a/gdb/testsuite/gdb.base/pc-fp.exp b/gdb/testsuite/gdb.base/pc-fp.exp index f732f47..1a27cc6 100644 --- a/gdb/testsuite/gdb.base/pc-fp.exp +++ b/gdb/testsuite/gdb.base/pc-fp.exp @@ -28,8 +28,6 @@ if $tracelevel then { # # test running programs # -set prms_id 0 -set bug_id 0 set testfile "pc-fp" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/pending.exp b/gdb/testsuite/gdb.base/pending.exp index 557ea0a..4fde9c1 100644 --- a/gdb/testsuite/gdb.base/pending.exp +++ b/gdb/testsuite/gdb.base/pending.exp @@ -23,8 +23,6 @@ if $tracelevel then { # # test running programs # -set prms_id 0 -set bug_id 0 if {[skip_shlib_tests]} { return 0 diff --git a/gdb/testsuite/gdb.base/pointers.exp b/gdb/testsuite/gdb.base/pointers.exp index 4b96e7e..3e739ab 100644 --- a/gdb/testsuite/gdb.base/pointers.exp +++ b/gdb/testsuite/gdb.base/pointers.exp @@ -29,8 +29,6 @@ if $tracelevel then { # # test running programs # -set prms_id 0 -set bug_id 0 set testfile "pointers" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/prelink.exp b/gdb/testsuite/gdb.base/prelink.exp index c90d6b5..c12f962 100644 --- a/gdb/testsuite/gdb.base/prelink.exp +++ b/gdb/testsuite/gdb.base/prelink.exp @@ -22,8 +22,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 # are we on a target board if ![isnative] then { diff --git a/gdb/testsuite/gdb.base/printcmds.exp b/gdb/testsuite/gdb.base/printcmds.exp index 6dd28a7..e87ae83 100644 --- a/gdb/testsuite/gdb.base/printcmds.exp +++ b/gdb/testsuite/gdb.base/printcmds.exp @@ -25,8 +25,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile "printcmds" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/psymtab.exp b/gdb/testsuite/gdb.base/psymtab.exp index 089af34..72d1eca 100644 --- a/gdb/testsuite/gdb.base/psymtab.exp +++ b/gdb/testsuite/gdb.base/psymtab.exp @@ -27,8 +27,6 @@ if $tracelevel then { # test running programs # -set prms_id 0 -set bug_id 0 if { [skip_cplus_tests] } { continue } diff --git a/gdb/testsuite/gdb.base/ptype.exp b/gdb/testsuite/gdb.base/ptype.exp index 589be34..b1942f0 100644 --- a/gdb/testsuite/gdb.base/ptype.exp +++ b/gdb/testsuite/gdb.base/ptype.exp @@ -23,8 +23,6 @@ if $tracelevel then { # # test running programs # -set prms_id 0 -set bug_id 0 set testfile "ptype" set srcfile0 ${testfile}.c diff --git a/gdb/testsuite/gdb.base/radix.exp b/gdb/testsuite/gdb.base/radix.exp index 9fd6cb5..3d7c0a0 100644 --- a/gdb/testsuite/gdb.base/radix.exp +++ b/gdb/testsuite/gdb.base/radix.exp @@ -22,8 +22,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 # Start with a fresh gdb. diff --git a/gdb/testsuite/gdb.base/recurse.exp b/gdb/testsuite/gdb.base/recurse.exp index cd1b698..9bd470f 100644 --- a/gdb/testsuite/gdb.base/recurse.exp +++ b/gdb/testsuite/gdb.base/recurse.exp @@ -20,8 +20,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile "recurse" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/relational.exp b/gdb/testsuite/gdb.base/relational.exp index d201ec8..c0b3dba 100644 --- a/gdb/testsuite/gdb.base/relational.exp +++ b/gdb/testsuite/gdb.base/relational.exp @@ -28,8 +28,6 @@ if $tracelevel then { # # test running programs # -set prms_id 0 -set bug_id 0 if { [prepare_for_testing relational.exp relational int-type.c {debug nowarnings}] } { return -1 diff --git a/gdb/testsuite/gdb.base/remote.exp b/gdb/testsuite/gdb.base/remote.exp index 6048d44..57b3e47 100644 --- a/gdb/testsuite/gdb.base/remote.exp +++ b/gdb/testsuite/gdb.base/remote.exp @@ -18,8 +18,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 # test only on a remote target board diff --git a/gdb/testsuite/gdb.base/reread.exp b/gdb/testsuite/gdb.base/reread.exp index 0a40b4a..17d0da3 100644 --- a/gdb/testsuite/gdb.base/reread.exp +++ b/gdb/testsuite/gdb.base/reread.exp @@ -18,9 +18,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 - set prototypes 1 # build the first test case @@ -54,9 +51,6 @@ set binfile ${objdir}/${subdir}/${testfile}$EXEEXT gdb_start gdb_reinitialize_dir $srcdir/$subdir -set prms_id 13484 -set bug_id 0 - # Load the first executable. gdb_test "shell mv ${binfile1} ${binfile}" "" "" @@ -97,8 +91,6 @@ gdb_test "shell touch ${binfile}" "" "" # and reset the breakpoints correctly. # Should see "Breakpoint 1, foo () at reread2.c:9" -set prms_id 0 - if [is_remote target] { unsupported "run to foo() second time "; } else { diff --git a/gdb/testsuite/gdb.base/restore.exp b/gdb/testsuite/gdb.base/restore.exp index 3862599..bd4e645 100644 --- a/gdb/testsuite/gdb.base/restore.exp +++ b/gdb/testsuite/gdb.base/restore.exp @@ -26,8 +26,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile "restore" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/return2.exp b/gdb/testsuite/gdb.base/return2.exp index ecc8aac..a1284dc 100644 --- a/gdb/testsuite/gdb.base/return2.exp +++ b/gdb/testsuite/gdb.base/return2.exp @@ -20,8 +20,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile "return2" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/savedregs.exp b/gdb/testsuite/gdb.base/savedregs.exp index e7f7d48..6434512 100644 --- a/gdb/testsuite/gdb.base/savedregs.exp +++ b/gdb/testsuite/gdb.base/savedregs.exp @@ -33,8 +33,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile savedregs set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/scope.exp b/gdb/testsuite/gdb.base/scope.exp index 15ecd6e..aa71d9a 100644 --- a/gdb/testsuite/gdb.base/scope.exp +++ b/gdb/testsuite/gdb.base/scope.exp @@ -20,8 +20,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile "scope" set binfile ${objdir}/${subdir}/${testfile} diff --git a/gdb/testsuite/gdb.base/sect-cmd.exp b/gdb/testsuite/gdb.base/sect-cmd.exp index 5f173b6..4c49725 100644 --- a/gdb/testsuite/gdb.base/sect-cmd.exp +++ b/gdb/testsuite/gdb.base/sect-cmd.exp @@ -23,8 +23,6 @@ global usestubs # # test running programs # -set prms_id 0 -set bug_id 0 # This test exists solely to exercise the "section" command for # code-coverage on HP-UX. (So far as I can tell, the "section" diff --git a/gdb/testsuite/gdb.base/sepdebug.exp b/gdb/testsuite/gdb.base/sepdebug.exp index 6802410..3825077 100644 --- a/gdb/testsuite/gdb.base/sepdebug.exp +++ b/gdb/testsuite/gdb.base/sepdebug.exp @@ -34,8 +34,6 @@ if $tracelevel then { # # test running programs # -set prms_id 0 -set bug_id 0 set testfile "sepdebug" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/set-lang-auto.exp b/gdb/testsuite/gdb.base/set-lang-auto.exp index 20ea9b8..5edf3d5 100644 --- a/gdb/testsuite/gdb.base/set-lang-auto.exp +++ b/gdb/testsuite/gdb.base/set-lang-auto.exp @@ -17,8 +17,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile start set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/setshow.exp b/gdb/testsuite/gdb.base/setshow.exp index 20fa804..4bee4eb 100644 --- a/gdb/testsuite/gdb.base/setshow.exp +++ b/gdb/testsuite/gdb.base/setshow.exp @@ -20,8 +20,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile "setshow" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/setvar.exp b/gdb/testsuite/gdb.base/setvar.exp index e79a734..5594ac9 100644 --- a/gdb/testsuite/gdb.base/setvar.exp +++ b/gdb/testsuite/gdb.base/setvar.exp @@ -28,8 +28,6 @@ if $tracelevel then { # # test running programs # -set prms_id 0 -set bug_id 0 set testfile "setvar" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/shlib-call.exp b/gdb/testsuite/gdb.base/shlib-call.exp index c6e2d99..b902e53 100644 --- a/gdb/testsuite/gdb.base/shlib-call.exp +++ b/gdb/testsuite/gdb.base/shlib-call.exp @@ -33,8 +33,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 if {[skip_shlib_tests]} { return 0 diff --git a/gdb/testsuite/gdb.base/shreloc.exp b/gdb/testsuite/gdb.base/shreloc.exp index 5349497..4c92205 100644 --- a/gdb/testsuite/gdb.base/shreloc.exp +++ b/gdb/testsuite/gdb.base/shreloc.exp @@ -32,8 +32,6 @@ if $tracelevel then { # This file uses shreloc.c, shreloc1.c and shreloc2.c # -set prms_id 0 -set bug_id 0 set workdir ${objdir}/${subdir} set testfile "shreloc" diff --git a/gdb/testsuite/gdb.base/sigall.exp b/gdb/testsuite/gdb.base/sigall.exp index e2b482c..cd436c7 100644 --- a/gdb/testsuite/gdb.base/sigall.exp +++ b/gdb/testsuite/gdb.base/sigall.exp @@ -23,8 +23,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 gdb_exit gdb_start diff --git a/gdb/testsuite/gdb.base/sigaltstack.exp b/gdb/testsuite/gdb.base/sigaltstack.exp index 9f46230..2482b9d 100644 --- a/gdb/testsuite/gdb.base/sigaltstack.exp +++ b/gdb/testsuite/gdb.base/sigaltstack.exp @@ -31,8 +31,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile sigaltstack set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/sigbpt.exp b/gdb/testsuite/gdb.base/sigbpt.exp index 960d589..660190a 100644 --- a/gdb/testsuite/gdb.base/sigbpt.exp +++ b/gdb/testsuite/gdb.base/sigbpt.exp @@ -37,8 +37,6 @@ if $tracelevel { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile "sigbpt" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/siginfo-addr.exp b/gdb/testsuite/gdb.base/siginfo-addr.exp index 1619928..89909da 100644 --- a/gdb/testsuite/gdb.base/siginfo-addr.exp +++ b/gdb/testsuite/gdb.base/siginfo-addr.exp @@ -34,8 +34,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile siginfo-addr set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/siginfo-obj.exp b/gdb/testsuite/gdb.base/siginfo-obj.exp index 85ce961..2d682a4 100644 --- a/gdb/testsuite/gdb.base/siginfo-obj.exp +++ b/gdb/testsuite/gdb.base/siginfo-obj.exp @@ -37,8 +37,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile siginfo-obj set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/siginfo.exp b/gdb/testsuite/gdb.base/siginfo.exp index 4846d24..102d894 100644 --- a/gdb/testsuite/gdb.base/siginfo.exp +++ b/gdb/testsuite/gdb.base/siginfo.exp @@ -32,8 +32,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile siginfo set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/signals.exp b/gdb/testsuite/gdb.base/signals.exp index 95248fc..e0e8232 100644 --- a/gdb/testsuite/gdb.base/signals.exp +++ b/gdb/testsuite/gdb.base/signals.exp @@ -23,8 +23,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile signals set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/signull.exp b/gdb/testsuite/gdb.base/signull.exp index 10392f8..a66e28c 100644 --- a/gdb/testsuite/gdb.base/signull.exp +++ b/gdb/testsuite/gdb.base/signull.exp @@ -36,8 +36,6 @@ if $tracelevel { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile "signull" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/sigrepeat.exp b/gdb/testsuite/gdb.base/sigrepeat.exp index 27147ae..7cfbddb 100644 --- a/gdb/testsuite/gdb.base/sigrepeat.exp +++ b/gdb/testsuite/gdb.base/sigrepeat.exp @@ -28,8 +28,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile sigrepeat set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/sigstep.exp b/gdb/testsuite/gdb.base/sigstep.exp index 1a36158..81d90c9 100644 --- a/gdb/testsuite/gdb.base/sigstep.exp +++ b/gdb/testsuite/gdb.base/sigstep.exp @@ -31,8 +31,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile sigstep set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/sizeof.exp b/gdb/testsuite/gdb.base/sizeof.exp index e91627f..dfa03ea 100644 --- a/gdb/testsuite/gdb.base/sizeof.exp +++ b/gdb/testsuite/gdb.base/sizeof.exp @@ -28,8 +28,6 @@ if $tracelevel { # # test running programs # -set prms_id 0 -set bug_id 0 set testfile "sizeof" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/so-impl-ld.exp b/gdb/testsuite/gdb.base/so-impl-ld.exp index 501a705..c01b38d 100644 --- a/gdb/testsuite/gdb.base/so-impl-ld.exp +++ b/gdb/testsuite/gdb.base/so-impl-ld.exp @@ -18,8 +18,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 if {[skip_shlib_tests]} { return 0 diff --git a/gdb/testsuite/gdb.base/so-indr-cl.exp b/gdb/testsuite/gdb.base/so-indr-cl.exp index 33afae7..87918b8 100644 --- a/gdb/testsuite/gdb.base/so-indr-cl.exp +++ b/gdb/testsuite/gdb.base/so-indr-cl.exp @@ -18,8 +18,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 # are we on a target board if ![isnative] then { diff --git a/gdb/testsuite/gdb.base/solib.exp b/gdb/testsuite/gdb.base/solib.exp index 441ad0c..46ad076 100644 --- a/gdb/testsuite/gdb.base/solib.exp +++ b/gdb/testsuite/gdb.base/solib.exp @@ -18,8 +18,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 # are we on a target board if ![isnative] then { diff --git a/gdb/testsuite/gdb.base/source.exp b/gdb/testsuite/gdb.base/source.exp index 2de6f04..05e6548 100644 --- a/gdb/testsuite/gdb.base/source.exp +++ b/gdb/testsuite/gdb.base/source.exp @@ -22,8 +22,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile "structs" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/stack-checking.exp b/gdb/testsuite/gdb.base/stack-checking.exp index 0bcf1ef..eb4bea8 100644 --- a/gdb/testsuite/gdb.base/stack-checking.exp +++ b/gdb/testsuite/gdb.base/stack-checking.exp @@ -17,8 +17,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile "stack-checking" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/start.exp b/gdb/testsuite/gdb.base/start.exp index 8853afd..c3b1e13 100644 --- a/gdb/testsuite/gdb.base/start.exp +++ b/gdb/testsuite/gdb.base/start.exp @@ -17,8 +17,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile start set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/step-bt.exp b/gdb/testsuite/gdb.base/step-bt.exp index 00d24ae..6b41390 100644 --- a/gdb/testsuite/gdb.base/step-bt.exp +++ b/gdb/testsuite/gdb.base/step-bt.exp @@ -20,8 +20,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile step-bt set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/store.exp b/gdb/testsuite/gdb.base/store.exp index 6fe432c..7bd5465 100644 --- a/gdb/testsuite/gdb.base/store.exp +++ b/gdb/testsuite/gdb.base/store.exp @@ -23,8 +23,6 @@ if $tracelevel { # # test running programs # -set prms_id 0 -set bug_id 0 set testfile "store" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/structs.exp b/gdb/testsuite/gdb.base/structs.exp index 1573e72..ddfd208 100644 --- a/gdb/testsuite/gdb.base/structs.exp +++ b/gdb/testsuite/gdb.base/structs.exp @@ -20,8 +20,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 # Some targets can't call functions, so don't even bother with this # test. diff --git a/gdb/testsuite/gdb.base/structs2.exp b/gdb/testsuite/gdb.base/structs2.exp index 8439c92..d2af02c 100644 --- a/gdb/testsuite/gdb.base/structs2.exp +++ b/gdb/testsuite/gdb.base/structs2.exp @@ -17,9 +17,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 - set prototypes 1 set testfile "structs2" set srcfile ${testfile}.c @@ -56,9 +53,6 @@ if { ![runto_main] } then { # Ok, we're finally ready to actually do our tests. -set prms_id 13536 -set bug_id 0 - gdb_test "f" \ ".*bkpt = 0.*" \ "structs2 sanity check" diff --git a/gdb/testsuite/gdb.base/term.exp b/gdb/testsuite/gdb.base/term.exp index fa4b68a..e97e68b 100644 --- a/gdb/testsuite/gdb.base/term.exp +++ b/gdb/testsuite/gdb.base/term.exp @@ -35,8 +35,6 @@ gdb_start # # test running programs # -set prms_id 0 -set bug_id 0 if { [prepare_for_testing term.exp term run.c] } { return -1 diff --git a/gdb/testsuite/gdb.base/twice.exp b/gdb/testsuite/gdb.base/twice.exp index 1592c3f..b2e1001 100644 --- a/gdb/testsuite/gdb.base/twice.exp +++ b/gdb/testsuite/gdb.base/twice.exp @@ -18,8 +18,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile twice-tmp set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/unload.exp b/gdb/testsuite/gdb.base/unload.exp index 20c0533..6d692a8 100644 --- a/gdb/testsuite/gdb.base/unload.exp +++ b/gdb/testsuite/gdb.base/unload.exp @@ -23,8 +23,6 @@ if $tracelevel then { # # test running programs # -set prms_id 0 -set bug_id 0 if {[skip_shlib_tests]} { return 0 diff --git a/gdb/testsuite/gdb.base/unwindonsignal.exp b/gdb/testsuite/gdb.base/unwindonsignal.exp index c5597dc..6f00874 100644 --- a/gdb/testsuite/gdb.base/unwindonsignal.exp +++ b/gdb/testsuite/gdb.base/unwindonsignal.exp @@ -27,8 +27,6 @@ if [target_info exists gdb,nosignals] { continue } -set prms_id 0 -set bug_id 0 set testfile "unwindonsignal" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/varargs.exp b/gdb/testsuite/gdb.base/varargs.exp index 61019af..ef8b6cb 100644 --- a/gdb/testsuite/gdb.base/varargs.exp +++ b/gdb/testsuite/gdb.base/varargs.exp @@ -33,8 +33,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set prototypes 0 set testfile "varargs" diff --git a/gdb/testsuite/gdb.base/volatile.exp b/gdb/testsuite/gdb.base/volatile.exp index b5ff432..a9ea984 100644 --- a/gdb/testsuite/gdb.base/volatile.exp +++ b/gdb/testsuite/gdb.base/volatile.exp @@ -37,8 +37,6 @@ if $tracelevel then { # # test running programs # -set prms_id 0 -set bug_id 0 # Use the same test program constvars.c. diff --git a/gdb/testsuite/gdb.base/watchpoint-solib.exp b/gdb/testsuite/gdb.base/watchpoint-solib.exp index f339324..274b577 100644 --- a/gdb/testsuite/gdb.base/watchpoint-solib.exp +++ b/gdb/testsuite/gdb.base/watchpoint-solib.exp @@ -20,8 +20,6 @@ if $tracelevel then { # # test running programs # -set prms_id 0 -set bug_id 0 if {[skip_shlib_tests]} { return 0 diff --git a/gdb/testsuite/gdb.base/watchpoint.exp b/gdb/testsuite/gdb.base/watchpoint.exp index 968998f..b53faef 100644 --- a/gdb/testsuite/gdb.base/watchpoint.exp +++ b/gdb/testsuite/gdb.base/watchpoint.exp @@ -20,8 +20,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile "watchpoint" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/watchpoints.exp b/gdb/testsuite/gdb.base/watchpoints.exp index 757d93d..1505be5 100644 --- a/gdb/testsuite/gdb.base/watchpoints.exp +++ b/gdb/testsuite/gdb.base/watchpoints.exp @@ -19,8 +19,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile "watchpoints" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.base/whatis-exp.exp b/gdb/testsuite/gdb.base/whatis-exp.exp index ab5c63f..3a1e2bb 100644 --- a/gdb/testsuite/gdb.base/whatis-exp.exp +++ b/gdb/testsuite/gdb.base/whatis-exp.exp @@ -32,8 +32,6 @@ if $tracelevel then { # # test running programs # -set prms_id 0 -set bug_id 0 if { [prepare_for_testing whatis-exp.exp whatis-exp int-type.c {debug nowarnings}] } { return -1 diff --git a/gdb/testsuite/gdb.base/whatis.exp b/gdb/testsuite/gdb.base/whatis.exp index 8e85ff7..83671e3 100644 --- a/gdb/testsuite/gdb.base/whatis.exp +++ b/gdb/testsuite/gdb.base/whatis.exp @@ -23,8 +23,6 @@ if $tracelevel { # # test running programs # -set prms_id 0 -set bug_id 0 if [target_info exists no_long_long] { set exec_opts [list debug additional_flags=-DNO_LONG_LONG] diff --git a/gdb/testsuite/gdb.cp/ambiguous.exp b/gdb/testsuite/gdb.cp/ambiguous.exp index 2defc28..dc4c2be 100644 --- a/gdb/testsuite/gdb.cp/ambiguous.exp +++ b/gdb/testsuite/gdb.cp/ambiguous.exp @@ -29,8 +29,6 @@ if $tracelevel then { # test running programs # -set prms_id 0 -set bug_id 0 if { [skip_cplus_tests] } { continue } diff --git a/gdb/testsuite/gdb.cp/annota2.exp b/gdb/testsuite/gdb.cp/annota2.exp index 6925bb0..7c767c9 100644 --- a/gdb/testsuite/gdb.cp/annota2.exp +++ b/gdb/testsuite/gdb.cp/annota2.exp @@ -24,8 +24,6 @@ if $tracelevel then { # # test running programs # -set prms_id 0 -set bug_id 0 if { [skip_cplus_tests] } { continue } diff --git a/gdb/testsuite/gdb.cp/annota3.exp b/gdb/testsuite/gdb.cp/annota3.exp index 1363ae8..f7a1d5f 100644 --- a/gdb/testsuite/gdb.cp/annota3.exp +++ b/gdb/testsuite/gdb.cp/annota3.exp @@ -23,8 +23,6 @@ if $tracelevel then { # # test running programs # -set prms_id 0 -set bug_id 0 if { [skip_cplus_tests] } { continue } diff --git a/gdb/testsuite/gdb.cp/anon-union.exp b/gdb/testsuite/gdb.cp/anon-union.exp index d0ce43b..7a31427 100644 --- a/gdb/testsuite/gdb.cp/anon-union.exp +++ b/gdb/testsuite/gdb.cp/anon-union.exp @@ -27,8 +27,6 @@ if $tracelevel then { # test running programs # -set prms_id 0 -set bug_id 0 if { [skip_cplus_tests] } { continue } diff --git a/gdb/testsuite/gdb.cp/arg-reference.exp b/gdb/testsuite/gdb.cp/arg-reference.exp index 8920b12..a54f88c 100644 --- a/gdb/testsuite/gdb.cp/arg-reference.exp +++ b/gdb/testsuite/gdb.cp/arg-reference.exp @@ -27,8 +27,6 @@ if $tracelevel then { if { [skip_cplus_tests] } { continue } -set prms_id 0 -set bug_id 0 set testfile "arg-reference" set srcfile ${testfile}.cc diff --git a/gdb/testsuite/gdb.cp/bool.exp b/gdb/testsuite/gdb.cp/bool.exp index 3d28232..5e267be 100644 --- a/gdb/testsuite/gdb.cp/bool.exp +++ b/gdb/testsuite/gdb.cp/bool.exp @@ -26,8 +26,6 @@ if $tracelevel then { if { [skip_cplus_tests] } { continue } -set prms_id 0 -set bug_id 0 set testfile "bool" set srcfile ${testfile}.cc diff --git a/gdb/testsuite/gdb.cp/breakpoint.exp b/gdb/testsuite/gdb.cp/breakpoint.exp index 74ed4a0..3c1e13e 100644 --- a/gdb/testsuite/gdb.cp/breakpoint.exp +++ b/gdb/testsuite/gdb.cp/breakpoint.exp @@ -26,8 +26,6 @@ if { [skip_cplus_tests] } { continue } # # test running programs # -set prms_id 0 -set bug_id 0 set testfile "breakpoint" set srcfile ${testfile}.cc diff --git a/gdb/testsuite/gdb.cp/call-c.exp b/gdb/testsuite/gdb.cp/call-c.exp index 62498a5..8288b31 100644 --- a/gdb/testsuite/gdb.cp/call-c.exp +++ b/gdb/testsuite/gdb.cp/call-c.exp @@ -17,8 +17,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 if { [skip_cplus_tests] } { continue } diff --git a/gdb/testsuite/gdb.cp/casts.exp b/gdb/testsuite/gdb.cp/casts.exp index 926f81b..882b369 100644 --- a/gdb/testsuite/gdb.cp/casts.exp +++ b/gdb/testsuite/gdb.cp/casts.exp @@ -29,8 +29,6 @@ if $tracelevel then { # test running programs # -set prms_id 0 -set bug_id 0 if { [skip_cplus_tests] } { continue } diff --git a/gdb/testsuite/gdb.cp/class2.exp b/gdb/testsuite/gdb.cp/class2.exp index 611a16b..96e5df3 100644 --- a/gdb/testsuite/gdb.cp/class2.exp +++ b/gdb/testsuite/gdb.cp/class2.exp @@ -19,8 +19,6 @@ if $tracelevel then { if { [skip_cplus_tests] } { continue } -set prms_id 0 -set bug_id 0 set testfile "class2" set srcfile ${testfile}.cc diff --git a/gdb/testsuite/gdb.cp/classes.exp b/gdb/testsuite/gdb.cp/classes.exp index d9b09c3..d004011 100644 --- a/gdb/testsuite/gdb.cp/classes.exp +++ b/gdb/testsuite/gdb.cp/classes.exp @@ -546,8 +546,6 @@ proc test_static_members {} { } proc do_tests {} { - global prms_id - global bug_id global subdir global objdir global srcdir @@ -555,8 +553,6 @@ proc do_tests {} { global gdb_prompt global nl - set prms_id 0 - set bug_id 0 # Start with a fresh gdb. diff --git a/gdb/testsuite/gdb.cp/cpexprs.exp b/gdb/testsuite/gdb.cp/cpexprs.exp index 6074763..e112c5e 100644 --- a/gdb/testsuite/gdb.cp/cpexprs.exp +++ b/gdb/testsuite/gdb.cp/cpexprs.exp @@ -672,8 +672,6 @@ if {[skip_cplus_tests]} { continue } # # test running programs # -set prms_id 0 -set bug_id 0 set testfile "cpexprs" set srcfile "${testfile}.cc" diff --git a/gdb/testsuite/gdb.cp/cplusfuncs.exp b/gdb/testsuite/gdb.cp/cplusfuncs.exp index 443af7a..96b57ca 100644 --- a/gdb/testsuite/gdb.cp/cplusfuncs.exp +++ b/gdb/testsuite/gdb.cp/cplusfuncs.exp @@ -697,8 +697,6 @@ proc test_paddr_hairy_functions {} { } proc do_tests {} { - global prms_id - global bug_id global subdir global objdir global srcdir @@ -706,8 +704,6 @@ proc do_tests {} { global gdb_prompt global dm_type_int_star - set prms_id 0 - set bug_id 0 # Start with a fresh gdb. diff --git a/gdb/testsuite/gdb.cp/demangle.exp b/gdb/testsuite/gdb.cp/demangle.exp index ee2679e..d00b8fe 100644 --- a/gdb/testsuite/gdb.cp/demangle.exp +++ b/gdb/testsuite/gdb.cp/demangle.exp @@ -1549,13 +1549,9 @@ proc catch_demangling_errors {command} { # internal demangler with synthesized strings and tests the results. proc do_tests {} { - global prms_id - global bug_id global subdir global gdb_prompt - set prms_id 0 - set bug_id 0 # Start with a fresh gdb. diff --git a/gdb/testsuite/gdb.cp/derivation.exp b/gdb/testsuite/gdb.cp/derivation.exp index de6cbf0..2ce3ab5 100644 --- a/gdb/testsuite/gdb.cp/derivation.exp +++ b/gdb/testsuite/gdb.cp/derivation.exp @@ -32,8 +32,6 @@ if $tracelevel then { # Start program. -set prms_id 0 -set bug_id 0 if { [skip_cplus_tests] } { continue } diff --git a/gdb/testsuite/gdb.cp/exception.exp b/gdb/testsuite/gdb.cp/exception.exp index e065877..2e49fe8 100644 --- a/gdb/testsuite/gdb.cp/exception.exp +++ b/gdb/testsuite/gdb.cp/exception.exp @@ -56,8 +56,6 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debu # Start with a fresh gdb -set prms_id 0 -set bug_id 0 gdb_exit gdb_start diff --git a/gdb/testsuite/gdb.cp/formatted-ref.exp b/gdb/testsuite/gdb.cp/formatted-ref.exp index 75938d7..7e2071f 100644 --- a/gdb/testsuite/gdb.cp/formatted-ref.exp +++ b/gdb/testsuite/gdb.cp/formatted-ref.exp @@ -31,8 +31,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 if { [skip_cplus_tests] } { continue } diff --git a/gdb/testsuite/gdb.cp/gdb1355.exp b/gdb/testsuite/gdb.cp/gdb1355.exp index fc88861..bb5d16f 100644 --- a/gdb/testsuite/gdb.cp/gdb1355.exp +++ b/gdb/testsuite/gdb.cp/gdb1355.exp @@ -30,8 +30,6 @@ if { [skip_cplus_tests] } { continue } # # test running programs # -set prms_id 0 -set bug_id 0 set testfile "gdb1355" set srcfile ${testfile}.cc diff --git a/gdb/testsuite/gdb.cp/gdb2384.exp b/gdb/testsuite/gdb.cp/gdb2384.exp index 1524f46..6af7ee3 100644 --- a/gdb/testsuite/gdb.cp/gdb2384.exp +++ b/gdb/testsuite/gdb.cp/gdb2384.exp @@ -18,6 +18,8 @@ # from objfile gdb2384-base.so. When the program is rerun the type # information for base-in-so-base.so is discarded leaving # TYPE_VPTR_BASETYPE dangling. +# +# PR c++/9489. if $tracelevel then { strace $tracelevel @@ -26,9 +28,6 @@ if $tracelevel then { if { [skip_cplus_tests] } { continue } if { [skip_shlib_tests] } { continue } -set prms_id 2384 -set bug_id 0 - set testfile "gdb2384" set srcfile ${testfile}.cc set binfile $objdir/$subdir/$testfile diff --git a/gdb/testsuite/gdb.cp/gdb2495.exp b/gdb/testsuite/gdb.cp/gdb2495.exp index e0f5ec1..c501b90 100644 --- a/gdb/testsuite/gdb.cp/gdb2495.exp +++ b/gdb/testsuite/gdb.cp/gdb2495.exp @@ -26,6 +26,8 @@ # inferior function call. These tests test the functionality around # unwinding that sequence and also tests the flag behaviour gating this # functionality. +# +# PR c++/9600. # This test is largely based of gdb.base/callfuncs.exp. @@ -45,9 +47,6 @@ if { [istarget "spu*-*-*"] } { return 0 } -set prms_id 2495 -set bug_id 0 - set testfile "gdb2495" set srcfile ${testfile}.cc set binfile $objdir/$subdir/$testfile diff --git a/gdb/testsuite/gdb.cp/hang.exp b/gdb/testsuite/gdb.cp/hang.exp index a8e3cd5..3eb96e0 100644 --- a/gdb/testsuite/gdb.cp/hang.exp +++ b/gdb/testsuite/gdb.cp/hang.exp @@ -18,8 +18,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 if { [skip_cplus_tests] } { continue } diff --git a/gdb/testsuite/gdb.cp/inherit.exp b/gdb/testsuite/gdb.cp/inherit.exp index 7b90637..183aa00 100644 --- a/gdb/testsuite/gdb.cp/inherit.exp +++ b/gdb/testsuite/gdb.cp/inherit.exp @@ -715,15 +715,11 @@ proc test_print_mvi_classes { } { } proc do_tests { } { - global prms_id - global bug_id global subdir global objdir global srcdir global binfile - set prms_id 0 - set bug_id 0 # Start with a fresh gdb. diff --git a/gdb/testsuite/gdb.cp/local.exp b/gdb/testsuite/gdb.cp/local.exp index c7b5f73..fa7e3e8 100644 --- a/gdb/testsuite/gdb.cp/local.exp +++ b/gdb/testsuite/gdb.cp/local.exp @@ -31,8 +31,6 @@ if $tracelevel then { # # test running programs # -set prms_id 0 -set bug_id 0 if { [skip_cplus_tests] } { continue } diff --git a/gdb/testsuite/gdb.cp/m-data.exp b/gdb/testsuite/gdb.cp/m-data.exp index 6fe16b8..3b71407 100644 --- a/gdb/testsuite/gdb.cp/m-data.exp +++ b/gdb/testsuite/gdb.cp/m-data.exp @@ -27,8 +27,6 @@ if { [skip_cplus_tests] } { continue } # # test running programs # -set prms_id 0 -set bug_id 0 set testfile "m-data" set srcfile ${testfile}.cc diff --git a/gdb/testsuite/gdb.cp/m-static.exp b/gdb/testsuite/gdb.cp/m-static.exp index 7b4e0ca..7d82d29 100644 --- a/gdb/testsuite/gdb.cp/m-static.exp +++ b/gdb/testsuite/gdb.cp/m-static.exp @@ -28,8 +28,6 @@ if { [skip_cplus_tests] } { continue } # # test running programs # -set prms_id 0 -set bug_id 0 set testfile "m-static" set srcfile "${testfile}.cc" diff --git a/gdb/testsuite/gdb.cp/mb-ctor.exp b/gdb/testsuite/gdb.cp/mb-ctor.exp index 9eff406..b38622e 100644 --- a/gdb/testsuite/gdb.cp/mb-ctor.exp +++ b/gdb/testsuite/gdb.cp/mb-ctor.exp @@ -22,8 +22,6 @@ if $tracelevel then { if { [skip_cplus_tests] } { continue } -set prms_id 0 -set bug_id 0 set testfile "mb-ctor" set srcfile ${testfile}.cc diff --git a/gdb/testsuite/gdb.cp/mb-inline.exp b/gdb/testsuite/gdb.cp/mb-inline.exp index 4f0cc94..292d6ac 100644 --- a/gdb/testsuite/gdb.cp/mb-inline.exp +++ b/gdb/testsuite/gdb.cp/mb-inline.exp @@ -24,8 +24,6 @@ if $tracelevel then { if { [skip_cplus_tests] } { continue } -set prms_id 0 -set bug_id 0 set testfile "mb-inline" set hdrfile "${testfile}.h" diff --git a/gdb/testsuite/gdb.cp/mb-templates.exp b/gdb/testsuite/gdb.cp/mb-templates.exp index ed44433..a88d2bc 100644 --- a/gdb/testsuite/gdb.cp/mb-templates.exp +++ b/gdb/testsuite/gdb.cp/mb-templates.exp @@ -27,8 +27,6 @@ if { [istarget "spu*-*-*"] } { return 0 } -set prms_id 0 -set bug_id 0 set testfile "mb-templates" set srcfile ${testfile}.cc diff --git a/gdb/testsuite/gdb.cp/member-ptr.exp b/gdb/testsuite/gdb.cp/member-ptr.exp index 083a329..329de52 100644 --- a/gdb/testsuite/gdb.cp/member-ptr.exp +++ b/gdb/testsuite/gdb.cp/member-ptr.exp @@ -28,8 +28,6 @@ if $tracelevel then { if { [skip_cplus_tests] } { continue } -set prms_id 0 -set bug_id 0 set testfile "member-ptr" set srcfile ${testfile}.cc diff --git a/gdb/testsuite/gdb.cp/method.exp b/gdb/testsuite/gdb.cp/method.exp index aff1c70..db21f29 100644 --- a/gdb/testsuite/gdb.cp/method.exp +++ b/gdb/testsuite/gdb.cp/method.exp @@ -36,8 +36,6 @@ if $tracelevel then { # # test running programs # -set prms_id 0 -set bug_id 0 if { [skip_cplus_tests] } { continue } diff --git a/gdb/testsuite/gdb.cp/misc.exp b/gdb/testsuite/gdb.cp/misc.exp index 4f9439c..7ff9305 100644 --- a/gdb/testsuite/gdb.cp/misc.exp +++ b/gdb/testsuite/gdb.cp/misc.exp @@ -92,16 +92,12 @@ proc test_expr { args } { } proc do_tests {} { - global prms_id - global bug_id global subdir global objdir global srcdir global binfile global gdb_prompt - set prms_id 0 - set bug_id 0 # Start with a fresh gdb. diff --git a/gdb/testsuite/gdb.cp/namespace-nested-import.exp b/gdb/testsuite/gdb.cp/namespace-nested-import.exp index 639adef..7f0fd74 100644 --- a/gdb/testsuite/gdb.cp/namespace-nested-import.exp +++ b/gdb/testsuite/gdb.cp/namespace-nested-import.exp @@ -17,8 +17,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile namespace-nested-import set srcfile ${testfile}.cc diff --git a/gdb/testsuite/gdb.cp/namespace.exp b/gdb/testsuite/gdb.cp/namespace.exp index fc59c5f..2fc0a4e 100644 --- a/gdb/testsuite/gdb.cp/namespace.exp +++ b/gdb/testsuite/gdb.cp/namespace.exp @@ -29,8 +29,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 if { [skip_cplus_tests] } { continue } diff --git a/gdb/testsuite/gdb.cp/nsdecl.exp b/gdb/testsuite/gdb.cp/nsdecl.exp index 6e0d875..188ec55 100644 --- a/gdb/testsuite/gdb.cp/nsdecl.exp +++ b/gdb/testsuite/gdb.cp/nsdecl.exp @@ -19,8 +19,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile nsdecl set srcfile ${testfile}.cc diff --git a/gdb/testsuite/gdb.cp/nsimport.exp b/gdb/testsuite/gdb.cp/nsimport.exp index e61e2ee..50acc1a 100644 --- a/gdb/testsuite/gdb.cp/nsimport.exp +++ b/gdb/testsuite/gdb.cp/nsimport.exp @@ -20,8 +20,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile nsimport set srcfile ${testfile}.cc diff --git a/gdb/testsuite/gdb.cp/nsrecurs.exp b/gdb/testsuite/gdb.cp/nsrecurs.exp index f884a97..80ed6dd 100644 --- a/gdb/testsuite/gdb.cp/nsrecurs.exp +++ b/gdb/testsuite/gdb.cp/nsrecurs.exp @@ -17,8 +17,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile nsrecurs set srcfile ${testfile}.cc diff --git a/gdb/testsuite/gdb.cp/nsstress.exp b/gdb/testsuite/gdb.cp/nsstress.exp index afe1bb0..d7ec9df 100644 --- a/gdb/testsuite/gdb.cp/nsstress.exp +++ b/gdb/testsuite/gdb.cp/nsstress.exp @@ -19,8 +19,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile nsstress set srcfile ${testfile}.cc diff --git a/gdb/testsuite/gdb.cp/nsusing.exp b/gdb/testsuite/gdb.cp/nsusing.exp index 718b4b8..d5fc27b 100644 --- a/gdb/testsuite/gdb.cp/nsusing.exp +++ b/gdb/testsuite/gdb.cp/nsusing.exp @@ -17,8 +17,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile nsusing set srcfile ${testfile}.cc diff --git a/gdb/testsuite/gdb.cp/overload.exp b/gdb/testsuite/gdb.cp/overload.exp index f879685..1d65475 100644 --- a/gdb/testsuite/gdb.cp/overload.exp +++ b/gdb/testsuite/gdb.cp/overload.exp @@ -28,8 +28,6 @@ if $tracelevel then { set ws "\[\r\n\t \]+" set nl "\[\r\n\]+" -set prms_id 0 -set bug_id 0 if { [skip_cplus_tests] } { continue } diff --git a/gdb/testsuite/gdb.cp/ovldbreak.exp b/gdb/testsuite/gdb.cp/ovldbreak.exp index 31ef63e..0e6c8a4 100644 --- a/gdb/testsuite/gdb.cp/ovldbreak.exp +++ b/gdb/testsuite/gdb.cp/ovldbreak.exp @@ -32,8 +32,6 @@ if $tracelevel then { # # test running programs # -set prms_id 0 -set bug_id 0 if { [skip_cplus_tests] } { continue } diff --git a/gdb/testsuite/gdb.cp/pr-1023.exp b/gdb/testsuite/gdb.cp/pr-1023.exp index 896ea72..f7762a7 100644 --- a/gdb/testsuite/gdb.cp/pr-1023.exp +++ b/gdb/testsuite/gdb.cp/pr-1023.exp @@ -27,8 +27,6 @@ if { [skip_cplus_tests] } { continue } # # test running programs # -set prms_id 0 -set bug_id 0 set testfile "pr-1023" set srcfile ${testfile}.cc diff --git a/gdb/testsuite/gdb.cp/pr-1210.exp b/gdb/testsuite/gdb.cp/pr-1210.exp index 98e06f2..aa5e607 100644 --- a/gdb/testsuite/gdb.cp/pr-1210.exp +++ b/gdb/testsuite/gdb.cp/pr-1210.exp @@ -26,8 +26,6 @@ if { [skip_cplus_tests] } { continue } # # test running programs # -set prms_id 0 -set bug_id 0 set testfile "pr-1210" set srcfile ${testfile}.cc diff --git a/gdb/testsuite/gdb.cp/pr-574.exp b/gdb/testsuite/gdb.cp/pr-574.exp index a116dc4..57b0080 100644 --- a/gdb/testsuite/gdb.cp/pr-574.exp +++ b/gdb/testsuite/gdb.cp/pr-574.exp @@ -29,8 +29,6 @@ if { [skip_cplus_tests] } { continue } # # test running programs # -set prms_id 0 -set bug_id 0 set testfile "pr-574" set srcfile ${testfile}.cc diff --git a/gdb/testsuite/gdb.cp/printmethod.exp b/gdb/testsuite/gdb.cp/printmethod.exp index 40c3240..12c9ca8 100644 --- a/gdb/testsuite/gdb.cp/printmethod.exp +++ b/gdb/testsuite/gdb.cp/printmethod.exp @@ -29,8 +29,6 @@ if { [skip_cplus_tests] } { continue } # # test running programs # -set prms_id 0 -set bug_id 0 set testfile "printmethod" set srcfile ${testfile}.cc diff --git a/gdb/testsuite/gdb.cp/psmang.exp b/gdb/testsuite/gdb.cp/psmang.exp index 76a3edf..1ecca84 100644 --- a/gdb/testsuite/gdb.cp/psmang.exp +++ b/gdb/testsuite/gdb.cp/psmang.exp @@ -179,8 +179,6 @@ if $tracelevel then { # test running programs # -set prms_id 0 -set bug_id 0 if { [skip_cplus_tests] } { continue } diff --git a/gdb/testsuite/gdb.cp/ref-params.exp b/gdb/testsuite/gdb.cp/ref-params.exp index b5b030a..6db4c9c 100644 --- a/gdb/testsuite/gdb.cp/ref-params.exp +++ b/gdb/testsuite/gdb.cp/ref-params.exp @@ -23,8 +23,6 @@ if $tracelevel then { # # test running programs # -set prms_id 0 -set bug_id 0 if { [skip_cplus_tests] } { continue } diff --git a/gdb/testsuite/gdb.cp/ref-types.exp b/gdb/testsuite/gdb.cp/ref-types.exp index 977eaa4..c137a57 100644 --- a/gdb/testsuite/gdb.cp/ref-types.exp +++ b/gdb/testsuite/gdb.cp/ref-types.exp @@ -24,8 +24,6 @@ if $tracelevel then { # # test running programs # -set prms_id 0 -set bug_id 0 if { [skip_cplus_tests] } { continue } diff --git a/gdb/testsuite/gdb.cp/rtti.exp b/gdb/testsuite/gdb.cp/rtti.exp index ad85344..0eda297 100644 --- a/gdb/testsuite/gdb.cp/rtti.exp +++ b/gdb/testsuite/gdb.cp/rtti.exp @@ -35,8 +35,6 @@ if { [skip_cplus_tests] } { continue } # # test running programs # -set prms_id 0 -set bug_id 0 set testfile "rtti" set srcfile1 "${testfile}1.cc" diff --git a/gdb/testsuite/gdb.cp/shadow.exp b/gdb/testsuite/gdb.cp/shadow.exp index 945cf99..2104172 100644 --- a/gdb/testsuite/gdb.cp/shadow.exp +++ b/gdb/testsuite/gdb.cp/shadow.exp @@ -20,8 +20,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile shadow set srcfile ${testfile}.cc diff --git a/gdb/testsuite/gdb.cp/templates.exp b/gdb/testsuite/gdb.cp/templates.exp index 321b659..cef2969 100644 --- a/gdb/testsuite/gdb.cp/templates.exp +++ b/gdb/testsuite/gdb.cp/templates.exp @@ -202,16 +202,12 @@ proc test_template_typedef {} { } proc do_tests {} { - global prms_id - global bug_id global subdir global objdir global srcdir global binfile global gdb_prompt - set prms_id 0 - set bug_id 0 # Start with a fresh gdb. diff --git a/gdb/testsuite/gdb.cp/try_catch.exp b/gdb/testsuite/gdb.cp/try_catch.exp index 86cb7b1..97d3a4f 100644 --- a/gdb/testsuite/gdb.cp/try_catch.exp +++ b/gdb/testsuite/gdb.cp/try_catch.exp @@ -27,8 +27,6 @@ if { [skip_stl_tests] } { continue } # # test running programs # -set prms_id 0 -set bug_id 0 set testfile "try_catch" set srcfile ${testfile}.cc diff --git a/gdb/testsuite/gdb.cp/virtfunc.exp b/gdb/testsuite/gdb.cp/virtfunc.exp index c76110b..009e1ca 100644 --- a/gdb/testsuite/gdb.cp/virtfunc.exp +++ b/gdb/testsuite/gdb.cp/virtfunc.exp @@ -231,13 +231,9 @@ proc test_virtual_calls {} { } proc do_tests {} { - global prms_id - global bug_id global srcdir subdir binfile global gdb_prompt - set prms_id 0 - set bug_id 0 gdb_exit gdb_start diff --git a/gdb/testsuite/gdb.disasm/am33.exp b/gdb/testsuite/gdb.disasm/am33.exp index 079eacc..523a9f1 100644 --- a/gdb/testsuite/gdb.disasm/am33.exp +++ b/gdb/testsuite/gdb.disasm/am33.exp @@ -26,8 +26,6 @@ if ![istarget "mn10300*-*-*"] { } global exec_output -set prms_id 0 -set bug_id 0 set testfile "am33" set srcfile ${srcdir}/${subdir}/${testfile}.s diff --git a/gdb/testsuite/gdb.disasm/h8300s.exp b/gdb/testsuite/gdb.disasm/h8300s.exp index 5658b19..69b5114 100644 --- a/gdb/testsuite/gdb.disasm/h8300s.exp +++ b/gdb/testsuite/gdb.disasm/h8300s.exp @@ -24,8 +24,6 @@ if ![istarget "h8300*-*-*"] { return } -set prms_id 0 -set bug_id 0 set testfile "h8300s" set srcfile ${srcdir}/${subdir}/${testfile}.s diff --git a/gdb/testsuite/gdb.disasm/hppa.exp b/gdb/testsuite/gdb.disasm/hppa.exp index 2f77411..6603d40 100644 --- a/gdb/testsuite/gdb.disasm/hppa.exp +++ b/gdb/testsuite/gdb.disasm/hppa.exp @@ -27,8 +27,6 @@ if ![istarget "hppa*-*-*"] { } -set prms_id 0 -set bug_id 0 set testfile "hppa" set srcfile ${srcdir}/${subdir}/${testfile}.s diff --git a/gdb/testsuite/gdb.disasm/mn10300.exp b/gdb/testsuite/gdb.disasm/mn10300.exp index 89dca20..52a2a83 100644 --- a/gdb/testsuite/gdb.disasm/mn10300.exp +++ b/gdb/testsuite/gdb.disasm/mn10300.exp @@ -26,8 +26,6 @@ if ![istarget "mn10300*-*-*"] { } global exec_output -set prms_id 0 -set bug_id 0 set testfile "mn10300" set srcfile ${srcdir}/${subdir}/${testfile}.s diff --git a/gdb/testsuite/gdb.disasm/sh3.exp b/gdb/testsuite/gdb.disasm/sh3.exp index eec780f..9d14cf1 100644 --- a/gdb/testsuite/gdb.disasm/sh3.exp +++ b/gdb/testsuite/gdb.disasm/sh3.exp @@ -25,8 +25,6 @@ if ![istarget "sh3*-*-*"] { return } -set prms_id 0 -set bug_id 0 set testfile "sh3" set srcfile ${srcdir}/${subdir}/${testfile}.s diff --git a/gdb/testsuite/gdb.disasm/t01_mov.exp b/gdb/testsuite/gdb.disasm/t01_mov.exp index 676a3b1..c8968ca 100644 --- a/gdb/testsuite/gdb.disasm/t01_mov.exp +++ b/gdb/testsuite/gdb.disasm/t01_mov.exp @@ -24,8 +24,6 @@ if ![istarget "h8300*-*-*"] { return } -set prms_id 0 -set bug_id 0 set testfile "t01_mov" set srcfile ${srcdir}/${subdir}/${testfile}.s diff --git a/gdb/testsuite/gdb.disasm/t02_mova.exp b/gdb/testsuite/gdb.disasm/t02_mova.exp index 03d8279..97aafa5 100644 --- a/gdb/testsuite/gdb.disasm/t02_mova.exp +++ b/gdb/testsuite/gdb.disasm/t02_mova.exp @@ -24,8 +24,6 @@ if ![istarget "h8300*-*-*"] { return } -set prms_id 0 -set bug_id 0 set testfile "t02_mova" set srcfile ${srcdir}/${subdir}/${testfile}.s diff --git a/gdb/testsuite/gdb.disasm/t03_add.exp b/gdb/testsuite/gdb.disasm/t03_add.exp index 0e58bfe..6e170fb 100644 --- a/gdb/testsuite/gdb.disasm/t03_add.exp +++ b/gdb/testsuite/gdb.disasm/t03_add.exp @@ -24,8 +24,6 @@ if ![istarget "h8300*-*-*"] { return } -set prms_id 0 -set bug_id 0 set testfile "t03_add" set srcfile ${srcdir}/${subdir}/${testfile}.s diff --git a/gdb/testsuite/gdb.disasm/t04_sub.exp b/gdb/testsuite/gdb.disasm/t04_sub.exp index 6c493f4..de5eb54 100644 --- a/gdb/testsuite/gdb.disasm/t04_sub.exp +++ b/gdb/testsuite/gdb.disasm/t04_sub.exp @@ -24,8 +24,6 @@ if ![istarget "h8300*-*-*"] { return } -set prms_id 0 -set bug_id 0 set testfile "t04_sub" set srcfile ${srcdir}/${subdir}/${testfile}.s diff --git a/gdb/testsuite/gdb.disasm/t05_cmp.exp b/gdb/testsuite/gdb.disasm/t05_cmp.exp index 009d5ae..271182c 100644 --- a/gdb/testsuite/gdb.disasm/t05_cmp.exp +++ b/gdb/testsuite/gdb.disasm/t05_cmp.exp @@ -24,8 +24,6 @@ if ![istarget "h8300*-*-*"] { return } -set prms_id 0 -set bug_id 0 set testfile "t05_cmp" set srcfile ${srcdir}/${subdir}/${testfile}.s diff --git a/gdb/testsuite/gdb.disasm/t06_ari2.exp b/gdb/testsuite/gdb.disasm/t06_ari2.exp index 5373b9c..885694bb 100644 --- a/gdb/testsuite/gdb.disasm/t06_ari2.exp +++ b/gdb/testsuite/gdb.disasm/t06_ari2.exp @@ -24,8 +24,6 @@ if ![istarget "h8300*-*-*"] { return } -set prms_id 0 -set bug_id 0 set testfile "t06_ari2" set srcfile ${srcdir}/${subdir}/${testfile}.s diff --git a/gdb/testsuite/gdb.disasm/t07_ari3.exp b/gdb/testsuite/gdb.disasm/t07_ari3.exp index 7632ed5..0ae22b0 100644 --- a/gdb/testsuite/gdb.disasm/t07_ari3.exp +++ b/gdb/testsuite/gdb.disasm/t07_ari3.exp @@ -24,8 +24,6 @@ if ![istarget "h8300*-*-*"] { return } -set prms_id 0 -set bug_id 0 set testfile "t07_ari3" set srcfile ${srcdir}/${subdir}/${testfile}.s diff --git a/gdb/testsuite/gdb.disasm/t08_or.exp b/gdb/testsuite/gdb.disasm/t08_or.exp index 55a7c5c..a33676f 100644 --- a/gdb/testsuite/gdb.disasm/t08_or.exp +++ b/gdb/testsuite/gdb.disasm/t08_or.exp @@ -24,8 +24,6 @@ if ![istarget "h8300*-*-*"] { return } -set prms_id 0 -set bug_id 0 set testfile "t08_or" set srcfile ${srcdir}/${subdir}/${testfile}.s diff --git a/gdb/testsuite/gdb.disasm/t09_xor.exp b/gdb/testsuite/gdb.disasm/t09_xor.exp index 752a490..8fc3655 100644 --- a/gdb/testsuite/gdb.disasm/t09_xor.exp +++ b/gdb/testsuite/gdb.disasm/t09_xor.exp @@ -24,8 +24,6 @@ if ![istarget "h8300*-*-*"] { return } -set prms_id 0 -set bug_id 0 set testfile "t09_xor" set srcfile ${srcdir}/${subdir}/${testfile}.s diff --git a/gdb/testsuite/gdb.disasm/t10_and.exp b/gdb/testsuite/gdb.disasm/t10_and.exp index d9fc36a..9ebcd81 100644 --- a/gdb/testsuite/gdb.disasm/t10_and.exp +++ b/gdb/testsuite/gdb.disasm/t10_and.exp @@ -24,8 +24,6 @@ if ![istarget "h8300*-*-*"] { return } -set prms_id 0 -set bug_id 0 set testfile "t10_and" set srcfile ${srcdir}/${subdir}/${testfile}.s diff --git a/gdb/testsuite/gdb.disasm/t11_logs.exp b/gdb/testsuite/gdb.disasm/t11_logs.exp index 6829868..7d80965 100644 --- a/gdb/testsuite/gdb.disasm/t11_logs.exp +++ b/gdb/testsuite/gdb.disasm/t11_logs.exp @@ -24,8 +24,6 @@ if ![istarget "h8300*-*-*"] { return } -set prms_id 0 -set bug_id 0 set testfile "t11_logs" set srcfile ${srcdir}/${subdir}/${testfile}.s diff --git a/gdb/testsuite/gdb.disasm/t12_bit.exp b/gdb/testsuite/gdb.disasm/t12_bit.exp index be19a71..6b9fd45 100644 --- a/gdb/testsuite/gdb.disasm/t12_bit.exp +++ b/gdb/testsuite/gdb.disasm/t12_bit.exp @@ -24,8 +24,6 @@ if ![istarget "h8300*-*-*"] { return } -set prms_id 0 -set bug_id 0 set testfile "t12_bit" set srcfile ${srcdir}/${subdir}/${testfile}.s diff --git a/gdb/testsuite/gdb.disasm/t13_otr.exp b/gdb/testsuite/gdb.disasm/t13_otr.exp index bb82862..e44b918 100644 --- a/gdb/testsuite/gdb.disasm/t13_otr.exp +++ b/gdb/testsuite/gdb.disasm/t13_otr.exp @@ -24,8 +24,6 @@ if ![istarget "h8300*-*-*"] { return } -set prms_id 0 -set bug_id 0 set testfile "t13_otr" set srcfile ${srcdir}/${subdir}/${testfile}.s diff --git a/gdb/testsuite/gdb.fortran/exprs.exp b/gdb/testsuite/gdb.fortran/exprs.exp index ec275b5..37e313a 100644 --- a/gdb/testsuite/gdb.fortran/exprs.exp +++ b/gdb/testsuite/gdb.fortran/exprs.exp @@ -23,8 +23,6 @@ if $tracelevel then { if { [skip_fortran_tests] } { continue } -set prms_id 0 -set bug_id 0 # Set the current language to fortran. This counts as a test. If it # fails, then we skip the other tests. diff --git a/gdb/testsuite/gdb.fortran/types.exp b/gdb/testsuite/gdb.fortran/types.exp index 4c3fa07..b44e5d0 100644 --- a/gdb/testsuite/gdb.fortran/types.exp +++ b/gdb/testsuite/gdb.fortran/types.exp @@ -23,8 +23,6 @@ if $tracelevel then { if { [skip_fortran_tests] } { continue } -set prms_id 0 -set bug_id 0 # Set the current language to fortran. This counts as a test. If it # fails, then we skip the other tests. diff --git a/gdb/testsuite/gdb.gdb/complaints.exp b/gdb/testsuite/gdb.gdb/complaints.exp index f9de03b..b4afcb5 100644 --- a/gdb/testsuite/gdb.gdb/complaints.exp +++ b/gdb/testsuite/gdb.gdb/complaints.exp @@ -21,8 +21,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 # are we on a target board if { [is_remote target] || ![isnative] } then { diff --git a/gdb/testsuite/gdb.gdb/observer.exp b/gdb/testsuite/gdb.gdb/observer.exp index 5a4ff28..ca5854b 100644 --- a/gdb/testsuite/gdb.gdb/observer.exp +++ b/gdb/testsuite/gdb.gdb/observer.exp @@ -20,8 +20,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 # are we on a target board if { [is_remote target] || ![isnative] } then { diff --git a/gdb/testsuite/gdb.gdb/selftest.exp b/gdb/testsuite/gdb.gdb/selftest.exp index 9e787f0..6e1236d 100644 --- a/gdb/testsuite/gdb.gdb/selftest.exp +++ b/gdb/testsuite/gdb.gdb/selftest.exp @@ -20,8 +20,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 # are we on a target board if { [is_remote target] || ![isnative] } then { diff --git a/gdb/testsuite/gdb.gdb/xfullpath.exp b/gdb/testsuite/gdb.gdb/xfullpath.exp index 5b8faf3..d7234db 100644 --- a/gdb/testsuite/gdb.gdb/xfullpath.exp +++ b/gdb/testsuite/gdb.gdb/xfullpath.exp @@ -21,8 +21,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 # are we on a target board if { [is_remote target] || ![isnative] } then { diff --git a/gdb/testsuite/gdb.hp/gdb.aCC/watch-cmd.exp b/gdb/testsuite/gdb.hp/gdb.aCC/watch-cmd.exp index c70a9a3..4c13dbb 100644 --- a/gdb/testsuite/gdb.hp/gdb.aCC/watch-cmd.exp +++ b/gdb/testsuite/gdb.hp/gdb.aCC/watch-cmd.exp @@ -20,8 +20,6 @@ if $tracelevel then { # # test special commands # -set prms_id 0 -set bug_id 0 if { [skip_hp_tests] } then { continue } diff --git a/gdb/testsuite/gdb.hp/gdb.base-hp/callfwmall.exp b/gdb/testsuite/gdb.hp/gdb.base-hp/callfwmall.exp index b418af9..64fd8a9 100644 --- a/gdb/testsuite/gdb.hp/gdb.base-hp/callfwmall.exp +++ b/gdb/testsuite/gdb.hp/gdb.base-hp/callfwmall.exp @@ -86,8 +86,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 if { [skip_hp_tests] } then { continue } diff --git a/gdb/testsuite/gdb.hp/gdb.base-hp/dollar.exp b/gdb/testsuite/gdb.hp/gdb.base-hp/dollar.exp index d0e22f1..809dff4 100644 --- a/gdb/testsuite/gdb.hp/gdb.base-hp/dollar.exp +++ b/gdb/testsuite/gdb.hp/gdb.base-hp/dollar.exp @@ -32,8 +32,6 @@ if $tracelevel then { # # test running programs # -set prms_id 0 -set bug_id 0 if { [skip_hp_tests] } { continue } diff --git a/gdb/testsuite/gdb.hp/gdb.base-hp/hwwatchbus.exp b/gdb/testsuite/gdb.hp/gdb.base-hp/hwwatchbus.exp index 7c06890..6df956b 100644 --- a/gdb/testsuite/gdb.hp/gdb.base-hp/hwwatchbus.exp +++ b/gdb/testsuite/gdb.hp/gdb.base-hp/hwwatchbus.exp @@ -18,8 +18,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 if { [skip_hp_tests] } then { continue } diff --git a/gdb/testsuite/gdb.hp/gdb.base-hp/pxdb.exp b/gdb/testsuite/gdb.hp/gdb.base-hp/pxdb.exp index b6a952f..b3eaf8b 100644 --- a/gdb/testsuite/gdb.hp/gdb.base-hp/pxdb.exp +++ b/gdb/testsuite/gdb.hp/gdb.base-hp/pxdb.exp @@ -24,8 +24,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 if { [skip_hp_tests] } then { continue } diff --git a/gdb/testsuite/gdb.hp/gdb.base-hp/sized-enum.exp b/gdb/testsuite/gdb.hp/gdb.base-hp/sized-enum.exp index 542285b..4ede503 100644 --- a/gdb/testsuite/gdb.hp/gdb.base-hp/sized-enum.exp +++ b/gdb/testsuite/gdb.hp/gdb.base-hp/sized-enum.exp @@ -30,8 +30,6 @@ if $tracelevel then { # # test running programs # -set prms_id 0 -set bug_id 0 if { [skip_hp_tests] } then { continue } diff --git a/gdb/testsuite/gdb.hp/gdb.base-hp/so-thresh.exp b/gdb/testsuite/gdb.hp/gdb.base-hp/so-thresh.exp index 689c367..1e87dc5 100644 --- a/gdb/testsuite/gdb.hp/gdb.base-hp/so-thresh.exp +++ b/gdb/testsuite/gdb.hp/gdb.base-hp/so-thresh.exp @@ -18,8 +18,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 if { [skip_hp_tests] } then { continue } diff --git a/gdb/testsuite/gdb.hp/gdb.compat/xdb1.exp b/gdb/testsuite/gdb.hp/gdb.compat/xdb1.exp index 00abb3f..d37eb54 100644 --- a/gdb/testsuite/gdb.hp/gdb.compat/xdb1.exp +++ b/gdb/testsuite/gdb.hp/gdb.compat/xdb1.exp @@ -27,8 +27,6 @@ global usestubs # # test running programs # -set prms_id 0 -set bug_id 0 set testfile "xdb" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.hp/gdb.compat/xdb2.exp b/gdb/testsuite/gdb.hp/gdb.compat/xdb2.exp index 836823d..742509c 100644 --- a/gdb/testsuite/gdb.hp/gdb.compat/xdb2.exp +++ b/gdb/testsuite/gdb.hp/gdb.compat/xdb2.exp @@ -27,8 +27,6 @@ global message # # test running programs # -set prms_id 0 -set bug_id 0 set testfile "xdb" set binfile ${objdir}/${subdir}/${testfile} diff --git a/gdb/testsuite/gdb.hp/gdb.defects/bs14602.exp b/gdb/testsuite/gdb.hp/gdb.defects/bs14602.exp index d1500f0..abd4e6f 100644 --- a/gdb/testsuite/gdb.hp/gdb.defects/bs14602.exp +++ b/gdb/testsuite/gdb.hp/gdb.defects/bs14602.exp @@ -13,8 +13,6 @@ if { [skip_hp_tests] } { continue } # # test running programs # -set prms_id 0 -set bug_id 0 set testfile bs14602 diff --git a/gdb/testsuite/gdb.hp/gdb.defects/solib-d.exp b/gdb/testsuite/gdb.hp/gdb.defects/solib-d.exp index aa84775..97e18a1 100644 --- a/gdb/testsuite/gdb.hp/gdb.defects/solib-d.exp +++ b/gdb/testsuite/gdb.hp/gdb.defects/solib-d.exp @@ -50,8 +50,6 @@ if $tracelevel { if { [skip_hp_tests] } { continue } -set prms_id 0 -set bug_id 0 # are we on a target board if ![isnative] { diff --git a/gdb/testsuite/gdb.java/jmain.exp b/gdb/testsuite/gdb.java/jmain.exp index 9814921..cdb3c99 100644 --- a/gdb/testsuite/gdb.java/jmain.exp +++ b/gdb/testsuite/gdb.java/jmain.exp @@ -31,8 +31,6 @@ if {[compile_java_from_source ${srcfile} ${binfile} "-g"] != ""} { continue } -set prms_id 0 -set bug_id 0 # Start with a fresh gdb. diff --git a/gdb/testsuite/gdb.java/jmisc.exp b/gdb/testsuite/gdb.java/jmisc.exp index 6380393..32a7443 100644 --- a/gdb/testsuite/gdb.java/jmisc.exp +++ b/gdb/testsuite/gdb.java/jmisc.exp @@ -52,8 +52,6 @@ proc set_lang_java {} { "set language to \"java\""] } -set prms_id 0 -set bug_id 0 # Start with a fresh gdb. diff --git a/gdb/testsuite/gdb.java/jprint.exp b/gdb/testsuite/gdb.java/jprint.exp index 2e33af4..178c80a 100644 --- a/gdb/testsuite/gdb.java/jprint.exp +++ b/gdb/testsuite/gdb.java/jprint.exp @@ -51,8 +51,6 @@ proc set_lang_java {} { "set language to \"java\""] } -set prms_id 0 -set bug_id 0 # Start with a fresh gdb. diff --git a/gdb/testsuite/gdb.java/jv-exp.exp b/gdb/testsuite/gdb.java/jv-exp.exp index e9b86c6..4f72dd4 100644 --- a/gdb/testsuite/gdb.java/jv-exp.exp +++ b/gdb/testsuite/gdb.java/jv-exp.exp @@ -17,8 +17,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 # Set the current language to Java. This counts as a test. If it # fails, then we skip the other tests. diff --git a/gdb/testsuite/gdb.java/jv-print.exp b/gdb/testsuite/gdb.java/jv-print.exp index 519e35b..a22d194 100644 --- a/gdb/testsuite/gdb.java/jv-print.exp +++ b/gdb/testsuite/gdb.java/jv-print.exp @@ -21,8 +21,6 @@ load_lib "java.exp" if { [skip_java_tests] } { continue } -set prms_id 0 -set bug_id 0 # Set the current language to Java. This counts as a test. If it # fails, then we skip the other tests. diff --git a/gdb/testsuite/gdb.mi/mi-pending.exp b/gdb/testsuite/gdb.mi/mi-pending.exp index 01d63e4..12ec1cc 100644 --- a/gdb/testsuite/gdb.mi/mi-pending.exp +++ b/gdb/testsuite/gdb.mi/mi-pending.exp @@ -23,8 +23,6 @@ if $tracelevel then { # # test running programs # -set prms_id 0 -set bug_id 0 if {[skip_shlib_tests]} { return 0 diff --git a/gdb/testsuite/gdb.objc/basicclass.exp b/gdb/testsuite/gdb.objc/basicclass.exp index 5bd5a37..04666b7 100644 --- a/gdb/testsuite/gdb.objc/basicclass.exp +++ b/gdb/testsuite/gdb.objc/basicclass.exp @@ -77,16 +77,12 @@ proc deduce_language_of_main {} { } proc do_objc_tests {} { - global prms_id - global bug_id global subdir global objdir global srcdir global binfile global gdb_prompt - set prms_id 0 - set bug_id 0 # Start with a fresh gdb. diff --git a/gdb/testsuite/gdb.objc/nondebug.exp b/gdb/testsuite/gdb.objc/nondebug.exp index 46b07f5..223a52c 100644 --- a/gdb/testsuite/gdb.objc/nondebug.exp +++ b/gdb/testsuite/gdb.objc/nondebug.exp @@ -34,16 +34,12 @@ if {[gdb_compile_objc "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable [ } proc do_objc_tests {} { - global prms_id - global bug_id global subdir global objdir global srcdir global binfile global gdb_prompt - set prms_id 0 - set bug_id 0 # Start with a fresh gdb. diff --git a/gdb/testsuite/gdb.objc/objcdecode.exp b/gdb/testsuite/gdb.objc/objcdecode.exp index b7a086c..a244ea8 100644 --- a/gdb/testsuite/gdb.objc/objcdecode.exp +++ b/gdb/testsuite/gdb.objc/objcdecode.exp @@ -34,16 +34,12 @@ if {[gdb_compile_objc "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable [ } proc do_objc_tests {} { - global prms_id - global bug_id global subdir global objdir global srcdir global binfile global gdb_prompt - set prms_id 0 - set bug_id 0 # Start with a fresh gdb. diff --git a/gdb/testsuite/gdb.pascal/types.exp b/gdb/testsuite/gdb.pascal/types.exp index 2369406..a51f725 100644 --- a/gdb/testsuite/gdb.pascal/types.exp +++ b/gdb/testsuite/gdb.pascal/types.exp @@ -23,8 +23,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 # Set the current language to pascal. This counts as a test. If it # fails, then we skip the other tests. diff --git a/gdb/testsuite/gdb.reverse/i386-precsave.exp b/gdb/testsuite/gdb.reverse/i386-precsave.exp index 05ad9f6..879d0ce 100644 --- a/gdb/testsuite/gdb.reverse/i386-precsave.exp +++ b/gdb/testsuite/gdb.reverse/i386-precsave.exp @@ -28,8 +28,6 @@ if $tracelevel { strace $tracelevel } -set prms_id 0 -set bug_id 0 if ![istarget "i?86-*linux*"] then { verbose "Skipping i386 reverse tests." diff --git a/gdb/testsuite/gdb.reverse/i386-reverse.exp b/gdb/testsuite/gdb.reverse/i386-reverse.exp index 3946824..50a590f 100644 --- a/gdb/testsuite/gdb.reverse/i386-reverse.exp +++ b/gdb/testsuite/gdb.reverse/i386-reverse.exp @@ -27,8 +27,6 @@ if $tracelevel { strace $tracelevel } -set prms_id 0 -set bug_id 0 if ![istarget "i?86-*linux*"] then { verbose "Skipping i386 reverse tests." diff --git a/gdb/testsuite/gdb.reverse/i386-sse-reverse.exp b/gdb/testsuite/gdb.reverse/i386-sse-reverse.exp index 872d0cf..b2ec686 100644 --- a/gdb/testsuite/gdb.reverse/i386-sse-reverse.exp +++ b/gdb/testsuite/gdb.reverse/i386-sse-reverse.exp @@ -27,8 +27,6 @@ if $tracelevel { strace $tracelevel } -set prms_id 0 -set bug_id 0 if ![istarget "*86*-*linux*"] then { verbose "Skipping i386 reverse tests." diff --git a/gdb/testsuite/gdb.reverse/i387-env-reverse.exp b/gdb/testsuite/gdb.reverse/i387-env-reverse.exp index 7e38930..79dd191 100644 --- a/gdb/testsuite/gdb.reverse/i387-env-reverse.exp +++ b/gdb/testsuite/gdb.reverse/i387-env-reverse.exp @@ -19,8 +19,6 @@ if $tracelevel { strace $tracelevel } -set prms_id 0 -set bug_id 0 if ![istarget "i?86-*linux*"] then { verbose "Skipping i387 reverse float tests." diff --git a/gdb/testsuite/gdb.reverse/i387-stack-reverse.exp b/gdb/testsuite/gdb.reverse/i387-stack-reverse.exp index 1c711fa..179eddf 100644 --- a/gdb/testsuite/gdb.reverse/i387-stack-reverse.exp +++ b/gdb/testsuite/gdb.reverse/i387-stack-reverse.exp @@ -19,8 +19,6 @@ if $tracelevel { strace $tracelevel } -set prms_id 0 -set bug_id 0 if ![istarget "i?86-*linux*"] then { verbose "Skipping i387 reverse float tests." diff --git a/gdb/testsuite/gdb.reverse/sigall-precsave.exp b/gdb/testsuite/gdb.reverse/sigall-precsave.exp index b57fd08..1206dac 100644 --- a/gdb/testsuite/gdb.reverse/sigall-precsave.exp +++ b/gdb/testsuite/gdb.reverse/sigall-precsave.exp @@ -26,8 +26,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 gdb_exit gdb_start diff --git a/gdb/testsuite/gdb.reverse/sigall-reverse.exp b/gdb/testsuite/gdb.reverse/sigall-reverse.exp index c9d28df..c1700fd 100644 --- a/gdb/testsuite/gdb.reverse/sigall-reverse.exp +++ b/gdb/testsuite/gdb.reverse/sigall-reverse.exp @@ -26,8 +26,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 gdb_exit gdb_start diff --git a/gdb/testsuite/gdb.stabs/exclfwd.exp b/gdb/testsuite/gdb.stabs/exclfwd.exp index 9fa783b..1d98eb2 100644 --- a/gdb/testsuite/gdb.stabs/exclfwd.exp +++ b/gdb/testsuite/gdb.stabs/exclfwd.exp @@ -29,8 +29,6 @@ if ![file isdirectory ${objdir}/${subdir}] then { # # test running programs # -set prms_id 0 -set bug_id 0 set testfile exclfwd set binfile ${objdir}/${subdir}/${testfile} diff --git a/gdb/testsuite/gdb.stabs/gdb11479.exp b/gdb/testsuite/gdb.stabs/gdb11479.exp index b7a3ca7..e8288a4 100644 --- a/gdb/testsuite/gdb.stabs/gdb11479.exp +++ b/gdb/testsuite/gdb.stabs/gdb11479.exp @@ -21,8 +21,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile "gdb11479" diff --git a/gdb/testsuite/gdb.stabs/weird.exp b/gdb/testsuite/gdb.stabs/weird.exp index 04dca73..3f1345e 100644 --- a/gdb/testsuite/gdb.stabs/weird.exp +++ b/gdb/testsuite/gdb.stabs/weird.exp @@ -27,8 +27,6 @@ if ![file isdirectory ${objdir}/${subdir}] then { return 0 } -set prms_id 0 -set bug_id 0 set testfile weird set srcfile ${objdir}/${subdir}/weird.s diff --git a/gdb/testsuite/gdb.threads/gcore-thread.exp b/gdb/testsuite/gdb.threads/gcore-thread.exp index 24faba7..a595b28 100644 --- a/gdb/testsuite/gdb.threads/gcore-thread.exp +++ b/gdb/testsuite/gdb.threads/gcore-thread.exp @@ -21,8 +21,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 # Single-threaded test case set testfile "pthreads" diff --git a/gdb/testsuite/gdb.threads/killed.exp b/gdb/testsuite/gdb.threads/killed.exp index 732f2ca..eaccaab 100644 --- a/gdb/testsuite/gdb.threads/killed.exp +++ b/gdb/testsuite/gdb.threads/killed.exp @@ -59,8 +59,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile "killed" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.threads/linux-dp.exp b/gdb/testsuite/gdb.threads/linux-dp.exp index f2f9b03..654ffc5 100644 --- a/gdb/testsuite/gdb.threads/linux-dp.exp +++ b/gdb/testsuite/gdb.threads/linux-dp.exp @@ -38,8 +38,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 # This only works with Linux configurations. if ![istarget *-*-linux-gnu*] then { diff --git a/gdb/testsuite/gdb.threads/manythreads.exp b/gdb/testsuite/gdb.threads/manythreads.exp index b736aa5..af15965 100644 --- a/gdb/testsuite/gdb.threads/manythreads.exp +++ b/gdb/testsuite/gdb.threads/manythreads.exp @@ -21,8 +21,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile "manythreads" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.threads/print-threads.exp b/gdb/testsuite/gdb.threads/print-threads.exp index ac25b1d..a671479 100644 --- a/gdb/testsuite/gdb.threads/print-threads.exp +++ b/gdb/testsuite/gdb.threads/print-threads.exp @@ -24,8 +24,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile "print-threads" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.threads/pthreads.exp b/gdb/testsuite/gdb.threads/pthreads.exp index 0ca0e5a..94138c5 100644 --- a/gdb/testsuite/gdb.threads/pthreads.exp +++ b/gdb/testsuite/gdb.threads/pthreads.exp @@ -20,8 +20,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 # This only works with native configurations if ![isnative] then { diff --git a/gdb/testsuite/gdb.threads/schedlock.exp b/gdb/testsuite/gdb.threads/schedlock.exp index ae007b3..5f966f9 100644 --- a/gdb/testsuite/gdb.threads/schedlock.exp +++ b/gdb/testsuite/gdb.threads/schedlock.exp @@ -23,8 +23,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile "schedlock" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.threads/staticthreads.exp b/gdb/testsuite/gdb.threads/staticthreads.exp index 454f786..06b576c 100644 --- a/gdb/testsuite/gdb.threads/staticthreads.exp +++ b/gdb/testsuite/gdb.threads/staticthreads.exp @@ -22,8 +22,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile "staticthreads" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.threads/step.exp b/gdb/testsuite/gdb.threads/step.exp index 154e88e..5af5d60 100644 --- a/gdb/testsuite/gdb.threads/step.exp +++ b/gdb/testsuite/gdb.threads/step.exp @@ -157,16 +157,12 @@ proc test_cond_wait {} { } proc do_tests {} { - global prms_id - global bug_id global subdir global objdir global srcdir global binfile global gdb_prompt - set prms_id 0 - set bug_id 0 # Start with a fresh gdb. diff --git a/gdb/testsuite/gdb.threads/step2.exp b/gdb/testsuite/gdb.threads/step2.exp index 536dfa8..031d7d1 100644 --- a/gdb/testsuite/gdb.threads/step2.exp +++ b/gdb/testsuite/gdb.threads/step2.exp @@ -134,8 +134,6 @@ if ![file exists $objdir/$subdir/$binfile] then { return } -set prms_id 0 -set bug_id 0 # Start with a fresh gdb. diff --git a/gdb/testsuite/gdb.threads/thread-specific.exp b/gdb/testsuite/gdb.threads/thread-specific.exp index 0bd07f7..50feac4 100644 --- a/gdb/testsuite/gdb.threads/thread-specific.exp +++ b/gdb/testsuite/gdb.threads/thread-specific.exp @@ -21,8 +21,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile "thread-specific" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.threads/thread_check.exp b/gdb/testsuite/gdb.threads/thread_check.exp index 05c7f6a..8b9b8ef 100644 --- a/gdb/testsuite/gdb.threads/thread_check.exp +++ b/gdb/testsuite/gdb.threads/thread_check.exp @@ -35,8 +35,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile "thread_check" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.threads/thread_events.exp b/gdb/testsuite/gdb.threads/thread_events.exp index 6a35271..abee495 100644 --- a/gdb/testsuite/gdb.threads/thread_events.exp +++ b/gdb/testsuite/gdb.threads/thread_events.exp @@ -37,8 +37,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile "thread_events" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.threads/threadapply.exp b/gdb/testsuite/gdb.threads/threadapply.exp index 612c8a5..bdf41c3 100644 --- a/gdb/testsuite/gdb.threads/threadapply.exp +++ b/gdb/testsuite/gdb.threads/threadapply.exp @@ -19,8 +19,6 @@ if $tracelevel { strace $tracelevel } -set prms_id 0 -set bug_id 0 # This test verifies that a macro using backtrace can be applied to all threads # and will continue for each thread even though an error may occur in diff --git a/gdb/testsuite/gdb.threads/watchthreads.exp b/gdb/testsuite/gdb.threads/watchthreads.exp index 733c6f3..df27b0b 100644 --- a/gdb/testsuite/gdb.threads/watchthreads.exp +++ b/gdb/testsuite/gdb.threads/watchthreads.exp @@ -21,8 +21,6 @@ if $tracelevel { strace $tracelevel } -set prms_id 0 -set bug_id 0 # This test verifies that a watchpoint is detected in the proper thread # so the test is only meaningful on a system with hardware watchpoints. diff --git a/gdb/testsuite/gdb.threads/watchthreads2.exp b/gdb/testsuite/gdb.threads/watchthreads2.exp index c5deaad..9ceba26 100644 --- a/gdb/testsuite/gdb.threads/watchthreads2.exp +++ b/gdb/testsuite/gdb.threads/watchthreads2.exp @@ -25,8 +25,6 @@ if $tracelevel { strace $tracelevel } -set prms_id 0 -set bug_id 0 # This test verifies that a watchpoint is detected in the proper thread # so the test is only meaningful on a system with hardware watchpoints. diff --git a/gdb/testsuite/gdb.trace/actions.exp b/gdb/testsuite/gdb.trace/actions.exp index 75f0652..0c27d84 100644 --- a/gdb/testsuite/gdb.trace/actions.exp +++ b/gdb/testsuite/gdb.trace/actions.exp @@ -21,8 +21,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 gdb_exit gdb_start diff --git a/gdb/testsuite/gdb.trace/ax.exp b/gdb/testsuite/gdb.trace/ax.exp index 0105ed6..c5e2c8c 100644 --- a/gdb/testsuite/gdb.trace/ax.exp +++ b/gdb/testsuite/gdb.trace/ax.exp @@ -24,8 +24,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 gdb_exit gdb_start diff --git a/gdb/testsuite/gdb.trace/backtrace.exp b/gdb/testsuite/gdb.trace/backtrace.exp index ea1a371..b3a5de1 100644 --- a/gdb/testsuite/gdb.trace/backtrace.exp +++ b/gdb/testsuite/gdb.trace/backtrace.exp @@ -21,8 +21,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 gdb_exit gdb_start diff --git a/gdb/testsuite/gdb.trace/circ.exp b/gdb/testsuite/gdb.trace/circ.exp index bb3dcd3..62f6dad 100644 --- a/gdb/testsuite/gdb.trace/circ.exp +++ b/gdb/testsuite/gdb.trace/circ.exp @@ -19,8 +19,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile "circ" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.trace/collection.exp b/gdb/testsuite/gdb.trace/collection.exp index 986cfaf..0a3f997 100644 --- a/gdb/testsuite/gdb.trace/collection.exp +++ b/gdb/testsuite/gdb.trace/collection.exp @@ -19,8 +19,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile "collection" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.trace/deltrace.exp b/gdb/testsuite/gdb.trace/deltrace.exp index 5bbc8cf..4c0014c 100644 --- a/gdb/testsuite/gdb.trace/deltrace.exp +++ b/gdb/testsuite/gdb.trace/deltrace.exp @@ -22,8 +22,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 gdb_exit gdb_start diff --git a/gdb/testsuite/gdb.trace/infotrace.exp b/gdb/testsuite/gdb.trace/infotrace.exp index 2718efd..8130553 100644 --- a/gdb/testsuite/gdb.trace/infotrace.exp +++ b/gdb/testsuite/gdb.trace/infotrace.exp @@ -21,8 +21,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 gdb_exit gdb_start diff --git a/gdb/testsuite/gdb.trace/limits.exp b/gdb/testsuite/gdb.trace/limits.exp index 1ff884e..57d09e9 100644 --- a/gdb/testsuite/gdb.trace/limits.exp +++ b/gdb/testsuite/gdb.trace/limits.exp @@ -19,8 +19,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 set testfile "limits" set srcfile ${testfile}.c diff --git a/gdb/testsuite/gdb.trace/packetlen.exp b/gdb/testsuite/gdb.trace/packetlen.exp index db4955b..4678495 100644 --- a/gdb/testsuite/gdb.trace/packetlen.exp +++ b/gdb/testsuite/gdb.trace/packetlen.exp @@ -21,8 +21,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 gdb_exit gdb_start diff --git a/gdb/testsuite/gdb.trace/passc-dyn.exp b/gdb/testsuite/gdb.trace/passc-dyn.exp index 58c1bed..ec7d435 100644 --- a/gdb/testsuite/gdb.trace/passc-dyn.exp +++ b/gdb/testsuite/gdb.trace/passc-dyn.exp @@ -22,8 +22,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 gdb_exit gdb_start diff --git a/gdb/testsuite/gdb.trace/passcount.exp b/gdb/testsuite/gdb.trace/passcount.exp index cb09393..0df9224 100644 --- a/gdb/testsuite/gdb.trace/passcount.exp +++ b/gdb/testsuite/gdb.trace/passcount.exp @@ -21,8 +21,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 gdb_exit gdb_start diff --git a/gdb/testsuite/gdb.trace/report.exp b/gdb/testsuite/gdb.trace/report.exp index 9a038cb..ed9ef51 100644 --- a/gdb/testsuite/gdb.trace/report.exp +++ b/gdb/testsuite/gdb.trace/report.exp @@ -21,8 +21,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 gdb_exit gdb_start diff --git a/gdb/testsuite/gdb.trace/save-trace.exp b/gdb/testsuite/gdb.trace/save-trace.exp index ab927f8..e527800 100644 --- a/gdb/testsuite/gdb.trace/save-trace.exp +++ b/gdb/testsuite/gdb.trace/save-trace.exp @@ -21,8 +21,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 gdb_exit gdb_start diff --git a/gdb/testsuite/gdb.trace/tfile.exp b/gdb/testsuite/gdb.trace/tfile.exp index 2140a45..59bed78 100644 --- a/gdb/testsuite/gdb.trace/tfile.exp +++ b/gdb/testsuite/gdb.trace/tfile.exp @@ -31,8 +31,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 gdb_exit gdb_start diff --git a/gdb/testsuite/gdb.trace/tfind.exp b/gdb/testsuite/gdb.trace/tfind.exp index fcbbd1d..49f2210 100644 --- a/gdb/testsuite/gdb.trace/tfind.exp +++ b/gdb/testsuite/gdb.trace/tfind.exp @@ -22,8 +22,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 gdb_exit gdb_start diff --git a/gdb/testsuite/gdb.trace/tracecmd.exp b/gdb/testsuite/gdb.trace/tracecmd.exp index 5ce31ba..cfe5ca3 100644 --- a/gdb/testsuite/gdb.trace/tracecmd.exp +++ b/gdb/testsuite/gdb.trace/tracecmd.exp @@ -21,8 +21,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 gdb_exit gdb_start diff --git a/gdb/testsuite/gdb.trace/tsv.exp b/gdb/testsuite/gdb.trace/tsv.exp index 1615b3b..3cd8ad5 100644 --- a/gdb/testsuite/gdb.trace/tsv.exp +++ b/gdb/testsuite/gdb.trace/tsv.exp @@ -19,8 +19,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 gdb_exit gdb_start diff --git a/gdb/testsuite/gdb.trace/while-dyn.exp b/gdb/testsuite/gdb.trace/while-dyn.exp index 4d1ae59..2831d25 100644 --- a/gdb/testsuite/gdb.trace/while-dyn.exp +++ b/gdb/testsuite/gdb.trace/while-dyn.exp @@ -21,8 +21,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 gdb_exit gdb_start diff --git a/gdb/testsuite/gdb.trace/while-stepping.exp b/gdb/testsuite/gdb.trace/while-stepping.exp index db0f91f..3d89563 100644 --- a/gdb/testsuite/gdb.trace/while-stepping.exp +++ b/gdb/testsuite/gdb.trace/while-stepping.exp @@ -21,8 +21,6 @@ if $tracelevel then { strace $tracelevel } -set prms_id 0 -set bug_id 0 gdb_exit gdb_start |