diff options
author | Stu Grossman <grossman@cygnus> | 1995-04-21 22:45:59 +0000 |
---|---|---|
committer | Stu Grossman <grossman@cygnus> | 1995-04-21 22:45:59 +0000 |
commit | 1e2bb16402b2183cdc2aba9056f156a8dff2012b (patch) | |
tree | 5f7c8783c6ca90073b7e4b5873bd26741188510c /gdb | |
parent | cdd2212f7514672add02f490e7f7ab19c67d3a6e (diff) | |
download | gdb-1e2bb16402b2183cdc2aba9056f156a8dff2012b.zip gdb-1e2bb16402b2183cdc2aba9056f156a8dff2012b.tar.gz gdb-1e2bb16402b2183cdc2aba9056f156a8dff2012b.tar.bz2 |
* cpu32bug.exp est.exp rom68k.exp: Delete. Unify into monitor.exp.
Diffstat (limited to 'gdb')
-rw-r--r-- | gdb/testsuite/ChangeLog | 4 | ||||
-rw-r--r-- | gdb/testsuite/config/cpu32bug.exp | 105 | ||||
-rw-r--r-- | gdb/testsuite/config/est.exp | 105 | ||||
-rw-r--r-- | gdb/testsuite/config/rom68k.exp | 105 |
4 files changed, 4 insertions, 315 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index 3457199..be59231 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,7 @@ +Fri Apr 21 15:44:02 1995 Stu Grossman (grossman@rtl.cygnus.com) + + * cpu32bug.exp est.exp rom68k.exp: Delete. Unify into monitor.exp. + Wed Apr 19 17:41:21 1995 Stu Grossman (grossman@cygnus.com) * config/est.exp: Fix copyright and comments. Remove dead code. diff --git a/gdb/testsuite/config/cpu32bug.exp b/gdb/testsuite/config/cpu32bug.exp deleted file mode 100644 index 920ea48..0000000 --- a/gdb/testsuite/config/cpu32bug.exp +++ /dev/null @@ -1,105 +0,0 @@ -# Test Framework Driver for GDB driving the Motorola Cpu32Bug monitor -# Copyright 1995 Free Software Foundation, Inc. -# -# This program is free software; you can redistribute it and/or modify -# it under the terms of the GNU General Public License as published by -# the Free Software Foundation; either version 2 of the License, or -# (at your option) any later version. -# -# This program is distributed in the hope that it will be useful, -# but WITHOUT ANY WARRANTY; without even the implied warranty of -# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the -# GNU General Public License for more details. -# -# You should have received a copy of the GNU General Public License -# along with this program; if not, write to the Free Software -# Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */ - -load_lib gdb.exp - -# -# gdb_version -- extract and print the version number of gdb -# -proc gdb_version {} { - default_gdb_version -} - -# -# gdb_target_cpu32bug -# Set gdb to target the monitor -# -proc gdb_target_cpu32bug { } { - global prompt - global exit_status - global targetname - global serialport - global baud - - send "target $targetname $serialport\n" - set timeout 60 - expect { - -re "Remote target cpu32bug connected to.*$prompt $" { - verbose "Set target to cpu32bug" - } - timeout { - perror "Couldn't set target for cpu32bug." - cleanup - exit $exit_status - } - } - set timeout 10 -} - -# -# gdb_load -- load a file into the debugger. -# return a -1 if anything goes wrong. -# -proc gdb_load { arg } { - global verbose - global loadpath - global loadfile - global GDB - global prompt - - if [gdb_file_cmd $arg] then { return -1 } - - gdb_target_cpu32bug - - send "load\n" - set timeout 2400 - expect { - -re ".*$prompt $" { - if $verbose>1 then { - send_user "Loaded $arg into $GDB\n" - } - set timeout 30 - return 1 - } - -re "$prompt $" { - if $verbose>1 then { - perror "GDB couldn't load." - } - } - timeout { - if $verbose>1 then { - perror "Timed out trying to load $arg." - } - } - } -} - -# -# gdb_start -- start GDB running. -# -proc gdb_start { } { - default_gdb_start -} - -# -# gdb_exit -- exit gdb -# -proc gdb_exit { } { - catch default_gdb_exit -} - -gdb_start diff --git a/gdb/testsuite/config/est.exp b/gdb/testsuite/config/est.exp deleted file mode 100644 index 4164daf..0000000 --- a/gdb/testsuite/config/est.exp +++ /dev/null @@ -1,105 +0,0 @@ -# Test Framework Driver for GDB driving the EST -# Copyright 1995 Free Software Foundation, Inc. -# -# This program is free software; you can redistribute it and/or modify -# it under the terms of the GNU General Public License as published by -# the Free Software Foundation; either version 2 of the License, or -# (at your option) any later version. -# -# This program is distributed in the hope that it will be useful, -# but WITHOUT ANY WARRANTY; without even the implied warranty of -# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the -# GNU General Public License for more details. -# -# You should have received a copy of the GNU General Public License -# along with this program; if not, write to the Free Software -# Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */ - -load_lib gdb.exp - -# -# gdb_version -- extract and print the version number of gdb -# -proc gdb_version {} { - default_gdb_version -} - -# -# gdb_target_est -# Set gdb to target the monitor -# -proc gdb_target_est { } { - global prompt - global exit_status - global targetname - global serialport - global baud - - send "target $targetname $serialport\n" - set timeout 60 - expect { - -re "Remote target est connected to.*$prompt $" { - verbose "Set target to est" - } - timeout { - perror "Couldn't set target for est." - cleanup - exit $exit_status - } - } - set timeout 10 -} - -# -# gdb_load -- load a file into the debugger. -# return a -1 if anything goes wrong. -# -proc gdb_load { arg } { - global verbose - global loadpath - global loadfile - global GDB - global prompt - - if [gdb_file_cmd $arg] then { return -1 } - - gdb_target_est - - send "load\n" - set timeout 2400 - expect { - -re ".*$prompt $" { - if $verbose>1 then { - send_user "Loaded $arg into $GDB\n" - } - set timeout 30 - return 1 - } - -re "$prompt $" { - if $verbose>1 then { - perror "GDB couldn't load." - } - } - timeout { - if $verbose>1 then { - perror "Timed out trying to load $arg." - } - } - } -} - -# -# gdb_start -- start GDB running. -# -proc gdb_start { } { - default_gdb_start -} - -# -# gdb_exit -- exit gdb -# -proc gdb_exit { } { - catch default_gdb_exit -} - -gdb_start diff --git a/gdb/testsuite/config/rom68k.exp b/gdb/testsuite/config/rom68k.exp deleted file mode 100644 index 83e0c7e..0000000 --- a/gdb/testsuite/config/rom68k.exp +++ /dev/null @@ -1,105 +0,0 @@ -# Test Framework Driver for GDB driving a Motorola IDP 68k development board -# Copyright 1994, 1995 Free Software Foundation, Inc. -# -# This program is free software; you can redistribute it and/or modify -# it under the terms of the GNU General Public License as published by -# the Free Software Foundation; either version 2 of the License, or -# (at your option) any later version. -# -# This program is distributed in the hope that it will be useful, -# but WITHOUT ANY WARRANTY; without even the implied warranty of -# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the -# GNU General Public License for more details. -# -# You should have received a copy of the GNU General Public License -# along with this program; if not, write to the Free Software -# Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */ - -load_lib gdb.exp - -# -# gdb_version -- extract and print the version number of gdb -# -proc gdb_version {} { - default_gdb_version -} - -# -# gdb_target_rom68k -# Set gdb to target the monitor -# -proc gdb_target_rom68k { } { - global prompt - global exit_status - global targetname - global serialport - global baud - - send "target $targetname $serialport\n" - set timeout 60 - expect { - -re "Remote target rom68k connected to.*$prompt $" { - verbose "Set target to rom68k" - } - timeout { - perror "Couldn't set target for rom68k." - cleanup - exit $exit_status - } - } - set timeout 10 -} - -# -# gdb_load -- load a file into the debugger. -# return a -1 if anything goes wrong. -# -proc gdb_load { arg } { - global verbose - global loadpath - global loadfile - global GDB - global prompt - - if [gdb_file_cmd $arg] then { return -1 } - - gdb_target_rom68k - - send "load\n" - set timeout 2400 - expect { - -re ".*$prompt $" { - if $verbose>1 then { - send_user "Loaded $arg into $GDB\n" - } - set timeout 30 - return 1 - } - -re "$prompt $" { - if $verbose>1 then { - perror "GDB couldn't load." - } - } - timeout { - if $verbose>1 then { - perror "Timed out trying to load $arg." - } - } - } -} - -# -# gdb_start -- start GDB running. -# -proc gdb_start { } { - default_gdb_start -} - -# -# gdb_exit -- exit gdb -# -proc gdb_exit { } { - catch default_gdb_exit -} - -gdb_start |