From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <gdb-patches-return-54490-listarch-gdb-patches=sources.redhat.com@sourceware.org>
Received: (qmail 989 invoked by alias); 12 Mar 2008 19:18:52 -0000
Received: (qmail 973 invoked by uid 22791); 12 Mar 2008 19:18:48 -0000
X-Spam-Check-By: sourceware.org
Received: from qnxmail.qnx.com (HELO qnxmail.qnx.com) (209.226.137.76)     by sourceware.org (qpsmtpd/0.31) with ESMTP; Wed, 12 Mar 2008 19:18:18 +0000
Received: from smtp.ott.qnx.com (smtp.ott.qnx.com [10.42.96.5]) 	by hub.ott.qnx.com (8.9.3/8.9.3) with ESMTP id OAA02579 	for <gdb-patches@sourceware.org>; Wed, 12 Mar 2008 14:59:33 -0400
Received: from [10.42.100.129] (dhcp-100-129 [10.42.100.129]) by smtp.ott.qnx.com (8.8.8/8.6.12) with ESMTP id OAA26819 for <gdb-patches@sourceware.org>; Wed, 12 Mar 2008 14:18:15 -0500
Message-ID: <47D82C77.8020705@qnx.com>
Date: Wed, 12 Mar 2008 19:18:00 -0000
From: Aleksandar Ristovski <aristovski@qnx.com>
User-Agent: Thunderbird 2.0.0.12 (Windows/20080213)
MIME-Version: 1.0
To: gdb-patches@sourceware.org
Subject: Re: [RFC] gdb.mi tests
References: <47D6DE48.8090003@qnx.com>
In-Reply-To: <47D6DE48.8090003@qnx.com>
Content-Type: multipart/mixed;  boundary="------------070403030709020806010406"
X-IsSubscribed: yes
Mailing-List: contact gdb-patches-help@sourceware.org; run by ezmlm
Precedence: bulk
List-Id: <gdb-patches.sourceware.org>
List-Subscribe: <mailto:gdb-patches-subscribe@sourceware.org>
List-Archive: <http://sourceware.org/ml/gdb-patches/>
List-Post: <mailto:gdb-patches@sourceware.org>
List-Help: <mailto:gdb-patches-help@sourceware.org>, <http://sourceware.org/ml/#faqs>
Sender: gdb-patches-owner@sourceware.org
X-SW-Source: 2008-03/txt/msg00132.txt.bz2

This is a multi-part message in MIME format.
--------------070403030709020806010406
Content-Type: text/plain; charset=ISO-8859-1; format=flowed
Content-Transfer-Encoding: 7bit
Content-length: 1281

Aleksandar Ristovski wrote:
> Hello,
> 
> By looking at gdb.mi I have noticed that (unfortunately) the way they are 
> written, they do not allow baseboard files to override mi_* functions.
> 
> gdb.base allows overriding which is great. For example, we override gdb_start 
> and gdb_load. In overriden functions we call default_ versions and then we 
> perform some additional tasks.
> 
> For gdb.mi, that is not possible since mi-support.exp is going to be loaded 
> after baseboard file.
> 
> 
> I would propose the following changes (only one test from gdb.mi is given as an 
> example) and would ask you to, please, comment.
> 
> Changes:
> 
> 1. gdb.exp loads mi-support.exp
> 2. mi-support.exp to "export" overridable functions. By this I mean to have 
> mi_cmd and default_mi_cmd pairs, where mi_cmd calls default_mi_cmd. Baseboard 
> can override mi_cmd (well, it can override anything, but this would be meant to 
> be overriden).
> 3. gdb.mi/* do not load explicitly mi-support.exp
> 
> Something like the diffs attached (I manually removed some things from my diff 
> so the diff may not be patchable, but it should be sufficient to illustrate what 
> am I talking about.
> 

Attached working diff. Comments welcome.

Thanks,

Aleksandar Ristovski
QNX Software Systems

--------------070403030709020806010406
Content-Type: text/plain;
 name="mi-support.diff"
Content-Transfer-Encoding: 7bit
Content-Disposition: inline;
 filename="mi-support.diff"
Content-length: 26132

Index: lib/gdb.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/lib/gdb.exp,v
retrieving revision 1.96
diff -u -p -r1.96 gdb.exp
--- lib/gdb.exp	23 Jan 2008 06:20:34 -0000	1.96
+++ lib/gdb.exp	12 Mar 2008 19:12:14 -0000
@@ -27,6 +27,7 @@ if {$tool == ""} {
 }
 
 load_lib libgloss.exp
+load_lib mi-support.exp
 
 global GDB
 
Index: lib/mi-support.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/lib/mi-support.exp,v
retrieving revision 1.51
diff -u -p -r1.51 mi-support.exp
--- lib/mi-support.exp	29 Jan 2008 19:36:58 -0000	1.51
+++ lib/mi-support.exp	12 Mar 2008 19:12:14 -0000
@@ -84,7 +84,7 @@ proc mi_uncatched_gdb_exit {} {
 }
 
 #
-# mi_gdb_start [INFERIOR_PTY] -- start gdb running, default procedure
+# default_mi_gdb_start [INFERIOR_PTY] -- start gdb running, default procedure
 #
 # INFERIOR_PTY should be set to separate-inferior-tty to have the inferior work 
 # with it's own PTY. If set to same-inferior-tty, the inferior shares GDB's PTY. 
@@ -94,7 +94,7 @@ proc mi_uncatched_gdb_exit {} {
 # tests on different hosts all using the same server, things can
 # get really slow.  Give gdb at least 3 minutes to start up.
 #
-proc mi_gdb_start { args } {
+proc default_mi_gdb_start { args } {
     global verbose
     global GDB
     global GDBFLAGS
@@ -230,6 +230,14 @@ proc mi_gdb_start { args } {
     return 0;
 }
 
+#
+# Overridable function. You can override this function in your
+# baseboard file.
+# 
+proc mi_gdb_start { args } {
+  return [default_mi_gdb_start $args]
+}
+
 # Many of the tests depend on setting breakpoints at various places and
 # running until that breakpoint is reached.  At times, we want to start
 # with a clean-slate with respect to breakpoints, so this utility proc 
Index: gdb.mi/gdb669.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/gdb669.exp,v
retrieving revision 1.9
diff -u -p -r1.9 gdb669.exp
--- gdb.mi/gdb669.exp	1 Jan 2008 22:53:20 -0000	1.9
+++ gdb.mi/gdb669.exp	12 Mar 2008 19:12:14 -0000
@@ -25,7 +25,7 @@ if {![isnative]} {
   return
 }
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi"
 
 gdb_exit
Index: gdb.mi/gdb680.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/gdb680.exp,v
retrieving revision 1.4
diff -u -p -r1.4 gdb680.exp
--- gdb.mi/gdb680.exp	1 Jan 2008 22:53:20 -0000	1.4
+++ gdb.mi/gdb680.exp	12 Mar 2008 19:12:14 -0000
@@ -20,7 +20,7 @@
 # test gdb/680
 #
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi"
 
 gdb_exit
Index: gdb.mi/gdb701.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/gdb701.exp,v
retrieving revision 1.7
diff -u -p -r1.7 gdb701.exp
--- gdb.mi/gdb701.exp	1 Jan 2008 22:53:20 -0000	1.7
+++ gdb.mi/gdb701.exp	12 Mar 2008 19:12:14 -0000
@@ -20,7 +20,7 @@
 # test gdb/701
 #
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi"
 
 gdb_exit
Index: gdb.mi/gdb792.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/gdb792.exp,v
retrieving revision 1.9
diff -u -p -r1.9 gdb792.exp
--- gdb.mi/gdb792.exp	1 Jan 2008 22:53:20 -0000	1.9
+++ gdb.mi/gdb792.exp	12 Mar 2008 19:12:14 -0000
@@ -22,7 +22,7 @@
 
 if { [skip_cplus_tests] } { continue }
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi"
 
 gdb_exit
Index: gdb.mi/mi-basics.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi-basics.exp,v
retrieving revision 1.19
diff -u -p -r1.19 mi-basics.exp
--- gdb.mi/mi-basics.exp	1 Jan 2008 22:53:20 -0000	1.19
+++ gdb.mi/mi-basics.exp	12 Mar 2008 19:12:14 -0000
@@ -29,7 +29,7 @@
 # but the command syntax and correct output response to MI operations.
 #
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi"
 
 gdb_exit
Index: gdb.mi/mi-break.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi-break.exp,v
retrieving revision 1.16
diff -u -p -r1.16 mi-break.exp
--- gdb.mi/mi-break.exp	27 Feb 2008 20:29:31 -0000	1.16
+++ gdb.mi/mi-break.exp	12 Mar 2008 19:12:14 -0000
@@ -24,7 +24,7 @@
 # but to verify the correct output response to MI operations.
 #
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi"
 
 gdb_exit
Index: gdb.mi/mi-cli.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi-cli.exp,v
retrieving revision 1.11
diff -u -p -r1.11 mi-cli.exp
--- gdb.mi/mi-cli.exp	22 Jan 2008 19:43:10 -0000	1.11
+++ gdb.mi/mi-cli.exp	12 Mar 2008 19:12:14 -0000
@@ -19,7 +19,7 @@
 # Console commands executed via MI should use MI output wrappers, MI event
 # handlers, etc.
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi"
 
 gdb_exit
Index: gdb.mi/mi-console.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi-console.exp,v
retrieving revision 1.21
diff -u -p -r1.21 mi-console.exp
--- gdb.mi/mi-console.exp	1 Jan 2008 22:53:20 -0000	1.21
+++ gdb.mi/mi-console.exp	12 Mar 2008 19:12:14 -0000
@@ -32,7 +32,7 @@
 # through GDB.  Check that we're either talking to a simulator or a
 # remote target.
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi"
 
 gdb_exit
Index: gdb.mi/mi-disassemble.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi-disassemble.exp,v
retrieving revision 1.19
diff -u -p -r1.19 mi-disassemble.exp
--- gdb.mi/mi-disassemble.exp	1 Jan 2008 22:53:20 -0000	1.19
+++ gdb.mi/mi-disassemble.exp	12 Mar 2008 19:12:14 -0000
@@ -21,7 +21,7 @@
 # but to verify the correct output response to MI operations.
 #
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi"
 
 gdb_exit
Index: gdb.mi/mi-eval.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi-eval.exp,v
retrieving revision 1.13
diff -u -p -r1.13 mi-eval.exp
--- gdb.mi/mi-eval.exp	1 Jan 2008 22:53:20 -0000	1.13
+++ gdb.mi/mi-eval.exp	12 Mar 2008 19:12:14 -0000
@@ -23,7 +23,7 @@
 # but to verify the correct output response to MI operations.
 #
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi"
 
 gdb_exit
Index: gdb.mi/mi-file-transfer.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi-file-transfer.exp,v
retrieving revision 1.2
diff -u -p -r1.2 mi-file-transfer.exp
--- gdb.mi/mi-file-transfer.exp	1 Jan 2008 22:53:20 -0000	1.2
+++ gdb.mi/mi-file-transfer.exp	12 Mar 2008 19:12:14 -0000
@@ -17,7 +17,7 @@
 # Test gdbserver monitor commands.
 
 load_lib gdbserver-support.exp
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi"
 
 if { [skip_gdbserver_tests] } {
Index: gdb.mi/mi-file.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi-file.exp,v
retrieving revision 1.12
diff -u -p -r1.12 mi-file.exp
--- gdb.mi/mi-file.exp	30 Jan 2008 08:49:52 -0000	1.12
+++ gdb.mi/mi-file.exp	12 Mar 2008 19:12:14 -0000
@@ -24,7 +24,7 @@
 # but to verify the correct output response to MI operations.
 #
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi"
 
 gdb_exit
Index: gdb.mi/mi-hack-cli.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi-hack-cli.exp,v
retrieving revision 1.9
diff -u -p -r1.9 mi-hack-cli.exp
--- gdb.mi/mi-hack-cli.exp	1 Jan 2008 22:53:20 -0000	1.9
+++ gdb.mi/mi-hack-cli.exp	12 Mar 2008 19:12:14 -0000
@@ -19,7 +19,7 @@
 
 # Some basic checks for the CLI.
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi"
 
 gdb_exit
Index: gdb.mi/mi-pending.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi-pending.exp,v
retrieving revision 1.3
diff -u -p -r1.3 mi-pending.exp
--- gdb.mi/mi-pending.exp	26 Feb 2008 08:14:11 -0000	1.3
+++ gdb.mi/mi-pending.exp	12 Mar 2008 19:12:14 -0000
@@ -13,7 +13,7 @@
 # You should have received a copy of the GNU General Public License
 # along with this program.  If not, see <http://www.gnu.org/licenses/>.
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi"
 
 if $tracelevel then {
Index: gdb.mi/mi-pthreads.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi-pthreads.exp,v
retrieving revision 1.11
diff -u -p -r1.11 mi-pthreads.exp
--- gdb.mi/mi-pthreads.exp	1 Jan 2008 22:53:20 -0000	1.11
+++ gdb.mi/mi-pthreads.exp	12 Mar 2008 19:12:14 -0000
@@ -27,7 +27,7 @@ if {![isnative]} {
   return
 }
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi"
 
 gdb_exit
Index: gdb.mi/mi-read-memory.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi-read-memory.exp,v
retrieving revision 1.13
diff -u -p -r1.13 mi-read-memory.exp
--- gdb.mi/mi-read-memory.exp	1 Jan 2008 22:53:20 -0000	1.13
+++ gdb.mi/mi-read-memory.exp	12 Mar 2008 19:12:14 -0000
@@ -28,7 +28,7 @@
 # but the command syntax and correct output response to MI operations.
 #
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi"
 
 gdb_exit
Index: gdb.mi/mi-regs.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi-regs.exp,v
retrieving revision 1.18
diff -u -p -r1.18 mi-regs.exp
--- gdb.mi/mi-regs.exp	1 Jan 2008 22:53:20 -0000	1.18
+++ gdb.mi/mi-regs.exp	12 Mar 2008 19:12:14 -0000
@@ -25,7 +25,7 @@
 #
 
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi"
 
 gdb_exit
Index: gdb.mi/mi-return.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi-return.exp,v
retrieving revision 1.17
diff -u -p -r1.17 mi-return.exp
--- gdb.mi/mi-return.exp	1 Jan 2008 22:53:20 -0000	1.17
+++ gdb.mi/mi-return.exp	12 Mar 2008 19:12:14 -0000
@@ -23,7 +23,7 @@
 # the correct output response to MI operations.  
 #
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi"
 
 gdb_exit
Index: gdb.mi/mi-simplerun.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi-simplerun.exp,v
retrieving revision 1.18
diff -u -p -r1.18 mi-simplerun.exp
--- gdb.mi/mi-simplerun.exp	27 Feb 2008 20:29:31 -0000	1.18
+++ gdb.mi/mi-simplerun.exp	12 Mar 2008 19:12:14 -0000
@@ -25,7 +25,7 @@
 # but to verify the correct output response to MI operations.
 #
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi"
 
 gdb_exit
Index: gdb.mi/mi-stack.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi-stack.exp,v
retrieving revision 1.25
diff -u -p -r1.25 mi-stack.exp
--- gdb.mi/mi-stack.exp	1 Jan 2008 22:53:20 -0000	1.25
+++ gdb.mi/mi-stack.exp	12 Mar 2008 19:12:14 -0000
@@ -23,7 +23,7 @@
 # but to verify the correct output response to MI operations.
 #
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi"
 
 gdb_exit
Index: gdb.mi/mi-stepi.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi-stepi.exp,v
retrieving revision 1.16
diff -u -p -r1.16 mi-stepi.exp
--- gdb.mi/mi-stepi.exp	1 Jan 2008 22:53:20 -0000	1.16
+++ gdb.mi/mi-stepi.exp	12 Mar 2008 19:12:14 -0000
@@ -23,7 +23,7 @@
 # the correct output response to MI operations.  
 #
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi"
 
 gdb_exit
Index: gdb.mi/mi-syn-frame.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi-syn-frame.exp,v
retrieving revision 1.13
diff -u -p -r1.13 mi-syn-frame.exp
--- gdb.mi/mi-syn-frame.exp	1 Jan 2008 22:53:20 -0000	1.13
+++ gdb.mi/mi-syn-frame.exp	12 Mar 2008 19:12:14 -0000
@@ -24,7 +24,7 @@ if [target_info exists gdb,nosignals] {
     continue
 }
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi"
 
 set testfile "mi-syn-frame"
Index: gdb.mi/mi-until.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi-until.exp,v
retrieving revision 1.15
diff -u -p -r1.15 mi-until.exp
--- gdb.mi/mi-until.exp	1 Jan 2008 22:53:20 -0000	1.15
+++ gdb.mi/mi-until.exp	12 Mar 2008 19:12:14 -0000
@@ -25,7 +25,7 @@
 # the correct output response to MI operations.  
 #
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi"
 
 gdb_exit
Index: gdb.mi/mi-var-block.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi-var-block.exp,v
retrieving revision 1.17
diff -u -p -r1.17 mi-var-block.exp
--- gdb.mi/mi-var-block.exp	1 Jan 2008 22:53:20 -0000	1.17
+++ gdb.mi/mi-var-block.exp	12 Mar 2008 19:12:14 -0000
@@ -20,7 +20,7 @@
 #
 
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi"
 
 gdb_exit
Index: gdb.mi/mi-var-child-f.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi-var-child-f.exp,v
retrieving revision 1.8
diff -u -p -r1.8 mi-var-child-f.exp
--- gdb.mi/mi-var-child-f.exp	1 Jan 2008 22:53:20 -0000	1.8
+++ gdb.mi/mi-var-child-f.exp	12 Mar 2008 19:12:14 -0000
@@ -15,7 +15,7 @@
 
 # Test variable objects treat non-zero offsets in Fortran arrays correctly.
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi"
 
 gdb_exit
Index: gdb.mi/mi-var-child.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi-var-child.exp,v
retrieving revision 1.30
diff -u -p -r1.30 mi-var-child.exp
--- gdb.mi/mi-var-child.exp	17 Jan 2008 14:34:22 -0000	1.30
+++ gdb.mi/mi-var-child.exp	12 Mar 2008 19:12:14 -0000
@@ -20,7 +20,7 @@
 #
 
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi"
 
 gdb_exit
Index: gdb.mi/mi-var-cmd.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi-var-cmd.exp,v
retrieving revision 1.34
diff -u -p -r1.34 mi-var-cmd.exp
--- gdb.mi/mi-var-cmd.exp	1 Jan 2008 22:53:20 -0000	1.34
+++ gdb.mi/mi-var-cmd.exp	12 Mar 2008 19:12:14 -0000
@@ -20,7 +20,7 @@
 #
 
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi"
 
 gdb_exit
Index: gdb.mi/mi-var-cp.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi-var-cp.exp,v
retrieving revision 1.9
diff -u -p -r1.9 mi-var-cp.exp
--- gdb.mi/mi-var-cp.exp	1 Jan 2008 22:53:20 -0000	1.9
+++ gdb.mi/mi-var-cp.exp	12 Mar 2008 19:12:14 -0000
@@ -15,7 +15,7 @@
 
 if { [skip_cplus_tests] } { continue }
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi"
 
 gdb_exit
Index: gdb.mi/mi-var-display.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi-var-display.exp,v
retrieving revision 1.21
diff -u -p -r1.21 mi-var-display.exp
--- gdb.mi/mi-var-display.exp	23 Jan 2008 06:20:57 -0000	1.21
+++ gdb.mi/mi-var-display.exp	12 Mar 2008 19:12:14 -0000
@@ -20,7 +20,7 @@
 #
 
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi"
 
 gdb_exit
Index: gdb.mi/mi-var-invalidate.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi-var-invalidate.exp,v
retrieving revision 1.3
diff -u -p -r1.3 mi-var-invalidate.exp
--- gdb.mi/mi-var-invalidate.exp	1 Jan 2008 22:53:20 -0000	1.3
+++ gdb.mi/mi-var-invalidate.exp	12 Mar 2008 19:12:14 -0000
@@ -20,7 +20,7 @@
 #
 
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi"
 
 gdb_exit
Index: gdb.mi/mi-watch.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi-watch.exp,v
retrieving revision 1.20
diff -u -p -r1.20 mi-watch.exp
--- gdb.mi/mi-watch.exp	1 Jan 2008 22:53:20 -0000	1.20
+++ gdb.mi/mi-watch.exp	12 Mar 2008 19:12:15 -0000
@@ -25,7 +25,7 @@
 # but to verify the correct output response to MI operations.
 #
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi"
 
 gdb_exit
Index: gdb.mi/mi2-basics.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi2-basics.exp,v
retrieving revision 1.11
diff -u -p -r1.11 mi2-basics.exp
--- gdb.mi/mi2-basics.exp	1 Jan 2008 22:53:20 -0000	1.11
+++ gdb.mi/mi2-basics.exp	12 Mar 2008 19:12:18 -0000
@@ -29,7 +29,7 @@
 # but the command syntax and correct output response to MI operations.
 #
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi2"
 
 gdb_exit
Index: gdb.mi/mi2-break.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi2-break.exp,v
retrieving revision 1.9
diff -u -p -r1.9 mi2-break.exp
--- gdb.mi/mi2-break.exp	27 Feb 2008 20:29:31 -0000	1.9
+++ gdb.mi/mi2-break.exp	12 Mar 2008 19:12:18 -0000
@@ -25,7 +25,7 @@
 # but to verify the correct output response to MI operations.
 #
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi2"
 
 gdb_exit
Index: gdb.mi/mi2-cli.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi2-cli.exp,v
retrieving revision 1.10
diff -u -p -r1.10 mi2-cli.exp
--- gdb.mi/mi2-cli.exp	22 Jan 2008 19:43:10 -0000	1.10
+++ gdb.mi/mi2-cli.exp	12 Mar 2008 19:12:18 -0000
@@ -19,7 +19,7 @@
 # Console commands executed via MI should use MI output wrappers, MI event
 # handlers, etc.
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi2"
 
 gdb_exit
Index: gdb.mi/mi2-console.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi2-console.exp,v
retrieving revision 1.9
diff -u -p -r1.9 mi2-console.exp
--- gdb.mi/mi2-console.exp	1 Jan 2008 22:53:20 -0000	1.9
+++ gdb.mi/mi2-console.exp	12 Mar 2008 19:12:18 -0000
@@ -32,7 +32,7 @@
 # through GDB.  Check that we're either talking to a simulator or a
 # remote target.
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi2"
 
 gdb_exit
Index: gdb.mi/mi2-disassemble.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi2-disassemble.exp,v
retrieving revision 1.9
diff -u -p -r1.9 mi2-disassemble.exp
--- gdb.mi/mi2-disassemble.exp	1 Jan 2008 22:53:20 -0000	1.9
+++ gdb.mi/mi2-disassemble.exp	12 Mar 2008 19:12:19 -0000
@@ -21,7 +21,7 @@
 # but to verify the correct output response to MI operations.
 #
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi2"
 
 gdb_exit
Index: gdb.mi/mi2-eval.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi2-eval.exp,v
retrieving revision 1.7
diff -u -p -r1.7 mi2-eval.exp
--- gdb.mi/mi2-eval.exp	1 Jan 2008 22:53:20 -0000	1.7
+++ gdb.mi/mi2-eval.exp	12 Mar 2008 19:12:19 -0000
@@ -23,7 +23,7 @@
 # but to verify the correct output response to MI operations.
 #
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi2"
 
 gdb_exit
Index: gdb.mi/mi2-file.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi2-file.exp,v
retrieving revision 1.12
diff -u -p -r1.12 mi2-file.exp
--- gdb.mi/mi2-file.exp	30 Jan 2008 08:50:10 -0000	1.12
+++ gdb.mi/mi2-file.exp	12 Mar 2008 19:12:19 -0000
@@ -24,7 +24,7 @@
 # but to verify the correct output response to MI operations.
 #
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi2"
 
 gdb_exit
Index: gdb.mi/mi2-hack-cli.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi2-hack-cli.exp,v
retrieving revision 1.5
diff -u -p -r1.5 mi2-hack-cli.exp
--- gdb.mi/mi2-hack-cli.exp	1 Jan 2008 22:53:20 -0000	1.5
+++ gdb.mi/mi2-hack-cli.exp	12 Mar 2008 19:12:19 -0000
@@ -19,7 +19,7 @@
 
 # Some basic checks for the CLI.
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi2"
 
 gdb_exit
Index: gdb.mi/mi2-pthreads.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi2-pthreads.exp,v
retrieving revision 1.6
diff -u -p -r1.6 mi2-pthreads.exp
--- gdb.mi/mi2-pthreads.exp	1 Jan 2008 22:53:20 -0000	1.6
+++ gdb.mi/mi2-pthreads.exp	12 Mar 2008 19:12:19 -0000
@@ -27,7 +27,7 @@ if {![isnative]} {
   return
 }
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi2"
 
 gdb_exit
Index: gdb.mi/mi2-read-memory.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi2-read-memory.exp,v
retrieving revision 1.6
diff -u -p -r1.6 mi2-read-memory.exp
--- gdb.mi/mi2-read-memory.exp	1 Jan 2008 22:53:20 -0000	1.6
+++ gdb.mi/mi2-read-memory.exp	12 Mar 2008 19:12:19 -0000
@@ -29,7 +29,7 @@
 # but the command syntax and correct output response to MI operations.
 #
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi2"
 
 gdb_exit
Index: gdb.mi/mi2-regs.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi2-regs.exp,v
retrieving revision 1.8
diff -u -p -r1.8 mi2-regs.exp
--- gdb.mi/mi2-regs.exp	1 Jan 2008 22:53:20 -0000	1.8
+++ gdb.mi/mi2-regs.exp	12 Mar 2008 19:12:19 -0000
@@ -26,7 +26,7 @@
 #
 
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi2"
 
 gdb_exit
Index: gdb.mi/mi2-return.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi2-return.exp,v
retrieving revision 1.9
diff -u -p -r1.9 mi2-return.exp
--- gdb.mi/mi2-return.exp	1 Jan 2008 22:53:20 -0000	1.9
+++ gdb.mi/mi2-return.exp	12 Mar 2008 19:12:19 -0000
@@ -23,7 +23,7 @@
 # the correct output response to MI operations.  
 #
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi2"
 
 gdb_exit
Index: gdb.mi/mi2-simplerun.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi2-simplerun.exp,v
retrieving revision 1.9
diff -u -p -r1.9 mi2-simplerun.exp
--- gdb.mi/mi2-simplerun.exp	27 Feb 2008 20:29:31 -0000	1.9
+++ gdb.mi/mi2-simplerun.exp	12 Mar 2008 19:12:19 -0000
@@ -25,7 +25,7 @@
 # but to verify the correct output response to MI operations.
 #
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi2"
 
 gdb_exit
Index: gdb.mi/mi2-stack.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi2-stack.exp,v
retrieving revision 1.11
diff -u -p -r1.11 mi2-stack.exp
--- gdb.mi/mi2-stack.exp	1 Jan 2008 22:53:20 -0000	1.11
+++ gdb.mi/mi2-stack.exp	12 Mar 2008 19:12:19 -0000
@@ -23,7 +23,7 @@
 # but to verify the correct output response to MI operations.
 #
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi2"
 
 gdb_exit
Index: gdb.mi/mi2-stepi.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi2-stepi.exp,v
retrieving revision 1.9
diff -u -p -r1.9 mi2-stepi.exp
--- gdb.mi/mi2-stepi.exp	1 Jan 2008 22:53:20 -0000	1.9
+++ gdb.mi/mi2-stepi.exp	12 Mar 2008 19:12:19 -0000
@@ -23,7 +23,7 @@
 # the correct output response to MI operations.  
 #
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi2"
 
 gdb_exit
Index: gdb.mi/mi2-syn-frame.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi2-syn-frame.exp,v
retrieving revision 1.10
diff -u -p -r1.10 mi2-syn-frame.exp
--- gdb.mi/mi2-syn-frame.exp	1 Jan 2008 22:53:20 -0000	1.10
+++ gdb.mi/mi2-syn-frame.exp	12 Mar 2008 19:12:19 -0000
@@ -24,7 +24,7 @@ if [target_info exists gdb,nosignals] {
     continue
 }
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi2"
 
 set testfile "mi-syn-frame"
Index: gdb.mi/mi2-until.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi2-until.exp,v
retrieving revision 1.9
diff -u -p -r1.9 mi2-until.exp
--- gdb.mi/mi2-until.exp	1 Jan 2008 22:53:20 -0000	1.9
+++ gdb.mi/mi2-until.exp	12 Mar 2008 19:12:19 -0000
@@ -26,7 +26,7 @@
 # the correct output response to MI operations.  
 #
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi2"
 
 gdb_exit
Index: gdb.mi/mi2-var-block.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi2-var-block.exp,v
retrieving revision 1.9
diff -u -p -r1.9 mi2-var-block.exp
--- gdb.mi/mi2-var-block.exp	1 Jan 2008 22:53:20 -0000	1.9
+++ gdb.mi/mi2-var-block.exp	12 Mar 2008 19:12:19 -0000
@@ -20,7 +20,7 @@
 #
 
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi2"
 
 gdb_exit
Index: gdb.mi/mi2-var-child.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi2-var-child.exp,v
retrieving revision 1.12
diff -u -p -r1.12 mi2-var-child.exp
--- gdb.mi/mi2-var-child.exp	17 Jan 2008 14:34:22 -0000	1.12
+++ gdb.mi/mi2-var-child.exp	12 Mar 2008 19:12:19 -0000
@@ -19,7 +19,7 @@
 #
 
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi2"
 
 gdb_exit
Index: gdb.mi/mi2-var-cmd.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi2-var-cmd.exp,v
retrieving revision 1.16
diff -u -p -r1.16 mi2-var-cmd.exp
--- gdb.mi/mi2-var-cmd.exp	1 Jan 2008 22:53:20 -0000	1.16
+++ gdb.mi/mi2-var-cmd.exp	12 Mar 2008 19:12:19 -0000
@@ -20,7 +20,7 @@
 #
 
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi2"
 
 gdb_exit
Index: gdb.mi/mi2-var-display.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi2-var-display.exp,v
retrieving revision 1.14
diff -u -p -r1.14 mi2-var-display.exp
--- gdb.mi/mi2-var-display.exp	23 Jan 2008 21:05:16 -0000	1.14
+++ gdb.mi/mi2-var-display.exp	12 Mar 2008 19:12:19 -0000
@@ -20,7 +20,7 @@
 #
 
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi2"
 
 gdb_exit
Index: gdb.mi/mi2-watch.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi2-watch.exp,v
retrieving revision 1.11
diff -u -p -r1.11 mi2-watch.exp
--- gdb.mi/mi2-watch.exp	1 Jan 2008 22:53:20 -0000	1.11
+++ gdb.mi/mi2-watch.exp	12 Mar 2008 19:12:19 -0000
@@ -25,7 +25,7 @@
 # but to verify the correct output response to MI operations.
 #
 
-load_lib mi-support.exp
+
 set MIFLAGS "-i=mi2"
 
 gdb_exit

--------------070403030709020806010406--