This is the mail archive of the
gdb-patches@sources.redhat.com
mailing list for the GDB project.
[RFA/MI testsuite] add expect_out global
- From: Keith Seitz <keiths at redhat dot com>
- To: gdb-patches at sources dot redhat dot com
- Date: Thu, 22 Aug 2002 13:59:38 -0700 (PDT)
- Subject: [RFA/MI testsuite] add expect_out global
Hi,
The following simple patches will allow callers of mi_gdb_test to access
the variable expect_out. Without this, expect_out will only be accessible
in mi_gdb_test, which does test writers little good.
Keith
ChangeLog
2002-08-22 Keith Seitz <keiths@redhat.com>
* lib/mi-support.exp (mi_gdb_test): Add global declaration
for expect_out, which will enable callers to access it.
Patch
Index: testsuite/lib/mi-support.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/lib/mi-support.exp,v
retrieving revision 1.13
diff -p -r1.13 mi-support.exp
*** testsuite/lib/mi-support.exp 12 Nov 2001 19:44:28 -0000 1.13
--- testsuite/lib/mi-support.exp 22 Aug 2002 20:56:23 -0000
*************** proc mi_gdb_load { arg } {
*** 382,388 ****
proc mi_gdb_test { args } {
global verbose
global mi_gdb_prompt
! global GDB
upvar timeout timeout
if [llength $args]>2 then {
--- 382,388 ----
proc mi_gdb_test { args } {
global verbose
global mi_gdb_prompt
! global GDB expect_out
upvar timeout timeout
if [llength $args]>2 then {