diff options
| author | Joel Brobecker <brobecker@gnat.com> | 2010-05-05 18:06:56 +0000 |
|---|---|---|
| committer | Joel Brobecker <brobecker@gnat.com> | 2010-05-05 18:06:56 +0000 |
| commit | 6d5d0eaf2fe5e9dbfcbe1db2c3aaedeaad091dd5 (patch) | |
| tree | 41dc42f15840409f4a53768ec7f3c0e0892aa3bd /gdb/testsuite | |
| parent | 7dcd7a8714c7718ac2131d7a5ef612212f2b5667 (diff) | |
| download | gdb-6d5d0eaf2fe5e9dbfcbe1db2c3aaedeaad091dd5.tar.gz | |
Do not set prms_id/bug_id anymore.
2010-05-05 Joel Brobecker <brobecker@adacore.com>
Remove the use of prms_id and bug_id throughout the testsuite.
Diffstat (limited to 'gdb/testsuite')
305 files changed, 13 insertions, 656 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index f8aaf35f62e..457a6282c35 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 f0379e0d90e..ba7e0a4b82e 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 5df7eeb40e8..80ced430e77 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 c76876b88f8..53d1c5498a9 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 801bca64407..d77f02415dd 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 f3ab6b995b3..4d0a6b76891 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 a02edf95098..04448d7f754 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 d746885ed23..bd2e873825c 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 70aa58a1c7d..4c47991d6c0 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 4009932f02c..eed96e65a30 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 5758b743761..cbb36beb766 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 0061770f2f1..3faa1951501 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 19dbada756e..981054ea43d 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 561ddef6580..426e9d32fe4 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 865257d9dd6..d4dd5a504ae 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 5628d728870..41f39cfb457 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 7567a570c36..fac9e11ffc3 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 265996ac648..03c1b172688 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 50495b1bb4b..72a8fb2181b 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 d51e598846b..ac966835b9a 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 73f3b5991a2..a178fed25bc 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 bac72b4bb71..a9028a32557 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 9d99df238a3..9aea55e4a28 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 51da9d49e94..c31c280c309 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 69afd36ac61..b3d41e1c304 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 9c8c9119c94..3a86c4b42ad 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 2e2ca11a4e4..f310a6f255a 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 615182f4685..3abe1eda016 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 0aaebda8d3e..7cc05fad140 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 4d6dd5cfe1c..b73c3aa1ce5 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 6fac1cd3490..241d46b526e 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 eb15d2739e5..e8b06577555 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 135de866020..93a8e321870 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 50ce6f3558e..4eda7d61554 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 27185910b57..6b6772365b6 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 a507e3b291b..b19e74bd8d6 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 04f2dd81931..18547b599d9 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 9bdd7c04657..c60900ef37d 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 f96d1dfe5a4..1a8e14273db 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 9e4c18088d4..68ab3a9658d 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 a5027d4e22d..634d4a67b0f 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 40ed86c9d88..763c5095b61 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 f339de5b18f..593b375f3c6 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 954c5d1d37a..3a8dd33e1c8 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 bc2b58271c3..58a12c0afbe 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 e03b881a22a..6a84ea4d70e 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 11fc8c1f780..02f55ca44da 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 2f175e0d6cd..f7fc6418d06 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 ee385adcd31..ca6f3fd7d13 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 8d1d6543ad8..45595ff9a14 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 d987348f61e..650591cd50d 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 38798680c88..7ed31e92cd4 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 689d5622843..37b15cf97cf 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 bc81f06a444..42bd89b9ce2 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 5f836b601f5..5c916310df2 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 38128e88abb..27af7032553 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 4a23b2ffca0..ea4e0ba103f 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 473831a7ae7..b8850f03a45 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 577129592a3..efd81704a0b 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 d668f0d928b..b756cbb7663 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 69f864a5847..0748998c167 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 1777159a259..89f16408e24 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 3a472a72eb4..92209b498c7 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 380e70619dc..6201e9e1aa4 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 47b83ada4fb..5326a6007a4 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 bc992dc2b12..624c7e3bacf 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 5d39ae58802..7c0b4dc7047 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 3bc3ecc1410..f7ef71384c3 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 c68708638b0..c8c86791c46 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 6c0b12c7f71..4841ecceadd 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 494e182dbc8..2a2e0ae1b0b 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 29eaf9155b3..9b6b5f90a89 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 9cf76ee46ca..ed310f5466b 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 e9be2863668..4de471d9cf9 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 393b12b9304..92fd105a61f 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 03603dc4039..e3de7f32ea0 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 dd633c3636d..4813d2ea647 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 3b46887f9ff..cbc31be6d6d 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 4f0f25f5d9a..6e7dea3c975 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 b302a3b675c..e412a20edb5 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 ee202840d27..fd69db7a721 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 fe69da1b4c1..3dfed5a8e15 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 049dcc4038a..d8a7ca198e8 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 43748a18f6a..e2220365410 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 71c883e2837..0f9f0f3bdb4 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 7db5cc1c70b..9fbae4b286c 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 da837ab5520..092f68e0cfc 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 7d47bd645e2..0efdfe9f71e 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 3f0d9574fac..558db01df3b 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 d9e2053e4da..ab6b6116a23 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 2e903b6858a..89a1945daf9 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 e360e3e2443..1591fa2ecf7 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 d94294ab9fb..dc0882ca3f4 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 c907896c41d..5ae911c0b8c 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 6b43d566008..8c80a0137ac 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 0eca3f728ac..3890af776d2 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 543a526cb2f..95098952184 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 03bb59df6ca..6b93fcf3a34 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 0c62c147c3d..2a2c070b7dc 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 d09be128e04..1e9dc12a132 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 ec8c78c1893..ed39bf43886 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 4969c67aea4..11f4ba49113 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 db012c25f54..8c1ad1ae84d 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 52888a2fd1a..b4df1b1b4d1 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 9fbff4099d0..feb7af114bb 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 4666316891d..bc7cf52097e 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 54b6881f589..39b6814f236 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 c75d11147fb..a18f08ffc20 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 f732f471db2..1a27cc62a7e 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 557ea0a85af..4fde9c167f2 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 4b96e7e2394..3e739abee90 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 c90d6b50391..c12f962c161 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 6dd28a7b1b9..e87ae83cf1b 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 089af341efc..72d1eca50ab 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 589be340163..b1942f08890 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 9fd6cb534fa..3d7c0a0cc0c 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 cd1b698d8a8..9bd470fac0f 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 d201ec81a35..c0b3dba9f91 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 6048d442a8b..57b3e47b254 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 0a40b4aae25..17d0da3fbfc 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 38625999a62..bd4e6452263 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 ecc8aac0032..a1284dcdd0c 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 e7f7d483322..6434512f740 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 15ecd6ece0b..aa71d9ab64e 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 5f173b6be5d..4c4972594e8 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 6802410ecf0..3825077ee26 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 20ea9b8529e..5edf3d5f2cd 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 20fa804c76b..4bee4eb0ec9 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 e79a734dcc9..5594ac941ff 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 c6e2d9929e5..b902e53646f 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 53494975d60..4c922058dcc 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 e2b482c6b1e..cd436c722c3 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 9f46230d2d0..2482b9d36d0 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 960d5891852..660190a2f05 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 1619928bcb7..89909da6701 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 85ce961df0b..2d682a40b4c 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 4846d2472ca..102d894c6fb 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 95248fc30c9..e0e823276e9 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 10392f85581..a66e28ccea7 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 27147ae9a2a..7cfbddb3512 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 1a3615808a1..81d90c97297 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 e91627fbb8d..dfa03eabd83 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 501a705c040..c01b38de4d4 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 33afae78b73..87918b86eac 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 441ad0cad57..46ad076a000 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 2de6f040617..05e654857f9 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 0bcf1ef9790..eb4bea8ecdd 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 8853afd2778..c3b1e1360da 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 00d24ae9b3f..6b4139034f9 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 6fe432c56b8..7bd54656e7b 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 1573e721871..ddfd208a336 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 8439c92ab3a..d2af02c0fd8 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 fa4b68a4045..e97e68bebe2 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 1592c3f34f8..b2e10011372 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 20c05337c57..6d692a87c56 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 c5597dcd002..6f00874c019 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 61019af950e..ef8b6cb7356 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 b5ff432ea90..a9ea984659f 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 f33932430a4..274b577e165 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 968998fd87a..b53faef42f2 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 757d93d1eef..1505be53ea7 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 ab5c63fb77c..3a1e2bb5c3e 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 8e85ff7b217..83671e3d43c 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 2defc2861fc..dc4c2bef227 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 6925bb04ab2..7c767c914c2 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 1363ae871ea..f7a1d5fc663 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 d0ce43bda02..7a31427d40e 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 8920b12d0da..a54f88c3578 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 3d28232ac86..5e267bee04c 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 74ed4a08167..3c1e13ed5f6 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 62498a548fb..8288b3135ce 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 926f81bf088..882b3696845 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 611a16b6c19..96e5df3cb9d 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 d9b09c30bb7..d004011da4d 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 60747631138..e112c5ed997 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 443af7a3b67..96b57caccf2 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 ee2679e71f0..d00b8fefc67 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 de6cbf0587c..2ce3ab5d9da 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 e065877c4f1..2e49fe8270a 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 75938d7ba4c..7e2071f6653 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 fc88861ffce..bb5d16f6a81 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 1524f46f386..6af7ee33fb6 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 e0f5ec1452d..c501b9064d5 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 a8e3cd582bb..3eb96e0f48e 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 7b9063741ae..183aa0056de 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 c7b5f73a1e1..fa7e3e89bd1 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 6fe16b84f66..3b714070ed9 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 7b4e0caba25..7d82d29e1f4 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 9eff406bac5..b38622e65e7 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 4f0cc94b9d5..292d6ac4e79 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 ed4443383bf..a88d2bcaed1 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 083a329fb2e..329de52c128 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 aff1c703f5e..db21f293ffe 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 4f9439ccea9..7ff9305949a 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 639adef08bc..7f0fd74b1ad 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 fc59c5fc0a2..2fc0a4e94c5 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 6e0d875a724..188ec55b411 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 e61e2eeb61d..50acc1acd48 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 f884a97d20a..80ed6dda14b 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 afe1bb08347..d7ec9df5f29 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 718b4b8d183..d5fc27bac2e 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 f8796851712..1d65475dd4b 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 31ef63e65ee..0e6c8a47d89 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 896ea72974e..f7762a7fde2 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 98e06f279b9..aa5e607713d 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 a116dc4d473..57b0080b929 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 40c32402ae1..12c9ca80a1c 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 76a3edfef5f..1ecca846f93 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 b5b030a918e..6db4c9c4189 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 977eaa42556..c137a5787fe 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 ad8534453a2..0eda297a626 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 945cf99c0ef..2104172bb11 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 321b6598af6..cef2969a5ae 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 86cb7b11e1b..97d3a4f3c36 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 c76110b661b..009e1ca03ab 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 079eaccf870..523a9f1cbc4 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 5658b19a8ba..69b51141627 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 2f77411a409..6603d409b27 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 89dca20aeb2..52a2a83a775 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 eec780faa06..9d14cf17944 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 676a3b137ca..c8968cad894 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 03d82794411..97aafa55272 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 0e58bfe4c72..6e170fb0cf3 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 6c493f43796..de5eb548378 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 009d5ae3ac5..271182c7e2e 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 5373b9caab7..885694bbf99 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 7632ed56912..0ae22b07326 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 55a7c5c47f6..a33676f01e9 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 752a4903d01..8fc3655e9b7 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 d9fc36a96d8..9ebcd81fd2c 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 6829868c601..7d80965bebc 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 be19a71ebce..6b9fd45aa31 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 bb828623d4e..e44b918c88f 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 ec275b5e71d..37e313a0ce8 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 4c3fa078432..b44e5d0f2f2 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 f9de03babab..b4afcb54cfb 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 5a4ff28b9bf..ca5854b9abf 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 9e787f024dd..6e1236ddd19 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 5b8faf36a7a..d7234db8282 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 c70a9a383d7..4c13dbb6a6b 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 b418af9e9cb..64fd8a9389c 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 d0e22f113bc..809dff4efd0 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 7c068903b6e..6df956b34d1 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 b6a952f6d14..b3eaf8bf1ca 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 542285b6123..4ede5039add 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 689c3677201..1e87dc5148a 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 00abb3faec6..d37eb546a87 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 836823d8569..742509cf724 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 d1500f01bd0..abd4e6f1b69 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 aa847757232..97e18a16d3b 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 98149213457..cdb3c994078 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 638039392ac..32a7443a864 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 2e33af413e5..178c80a5a5f 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 e9b86c6d2a6..4f72dd41f65 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 519e35b9e26..a22d1942f3e 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 01d63e4b7f8..12ec1cc2e61 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 5bd5a371de3..04666b749a2 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 46b07f59701..223a52cf48b 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 b7a086c1c1a..a244ea8a250 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 23694069285..a51f7256b6f 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 05ad9f6faf2..879d0cee4ee 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 3946824b421..50a590f472b 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 872d0cfd60b..b2ec68696d3 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 7e389300cca..79dd191aba5 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 1c711faaa99..179eddf7ec2 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 b57fd081af6..1206dac9a56 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 c9d28dfd5c8..c1700fd3a9c 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 9fa783bdc38..1d98eb24494 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 b7a3ca7bd80..e8288a4f2da 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 04dca7394e1..3f1345ef815 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 24faba73435..a595b283fd8 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 732f2ca688e..eaccaabeb5a 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 f2f9b036d7b..654ffc52732 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 b736aa5f8b7..af15965a377 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 ac25b1d1b7c..a671479c930 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 0ca0e5ae0a8..94138c536e8 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 ae007b35738..5f966f943ec 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 454f78656c3..06b576cce48 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 154e88e0162..5af5d60d235 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 536dfa89f10..031d7d18d23 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 0bd07f7178a..50feac4359a 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 05c7f6a5e79..8b9b8ef02d4 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 6a352712194..abee4955a9c 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 612c8a55b9e..bdf41c32cae 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 733c6f32b80..df27b0b5b7a 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 c5deaadc06e..9ceba26aa0d 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 75f06529fed..0c27d84868b 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 0105ed6199c..c5e2c8cdbf5 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 ea1a3718b94..b3a5de103a4 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 bb3dcd3dc5b..62f6daddec4 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 986cfaf5b19..0a3f9978b22 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 5bbc8cf098d..4c0014c8267 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 2718efdcdfb..81305539ae7 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 1ff884e7062..57d09e93b65 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 db4955bef73..4678495b2a2 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 58c1bed03e6..ec7d435c972 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 cb09393682f..0df9224ec76 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 9a038cbbe7d..ed9ef51162b 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 ab927f80834..e5278003cce 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 2140a451845..59bed78148d 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 fcbbd1d41de..49f22100650 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 5ce31badcba..cfe5ca38cf2 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 1615b3bf911..3cd8ad5af8d 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 4d1ae596fcd..2831d25b921 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 db0f91f1cfe..3d895636b07 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 |