diff options
author | Stan Shebs <shebs@codesourcery.com> | 1999-04-16 01:34:07 +0000 |
---|---|---|
committer | Stan Shebs <shebs@codesourcery.com> | 1999-04-16 01:34:07 +0000 |
commit | 071ea11e85eb9d529cc5eb3d35f6247466a21b99 (patch) | |
tree | 5deda65b8d7b04d1f4cbc534c3206d328e1267ec /gdb/testsuite/config/sim.exp | |
parent | 1730ec6b1848f0f32154277f788fb29f88d8475b (diff) | |
download | gdb-071ea11e85eb9d529cc5eb3d35f6247466a21b99.zip gdb-071ea11e85eb9d529cc5eb3d35f6247466a21b99.tar.gz gdb-071ea11e85eb9d529cc5eb3d35f6247466a21b99.tar.bz2 |
Initial creation of sourceware repository
Diffstat (limited to 'gdb/testsuite/config/sim.exp')
-rw-r--r-- | gdb/testsuite/config/sim.exp | 105 |
1 files changed, 0 insertions, 105 deletions
diff --git a/gdb/testsuite/config/sim.exp b/gdb/testsuite/config/sim.exp deleted file mode 100644 index 009ceb9..0000000 --- a/gdb/testsuite/config/sim.exp +++ /dev/null @@ -1,105 +0,0 @@ -# Test Framework Driver for GDB driving a builtin simulator -# Copyright 1994, 1997, 1998 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., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. - -load_lib gdb.exp - -# The SH simulator by default will allocate 16M of memory, which is -# convenient, but it slows down testing to chew up that much swap; -# so supply an option that makes the simulator allocate 256K. - -set target_sim_options "" - -if [istarget "sh*-*-*"] then { - set target_sim_options "18" -} - -# The ERC32 simulator requires the argument -sparclite in order -# to emulate sparclite-specific instructions. - -if [istarget "sparclite*-*-*"] then { - set target_sim_options "-sparclite" -} -if [istarget "sparc86x*-*-*"] then { - set target_sim_options "-sparclite" -} - -# -# gdb_target_sim -# Set gdb to target the simulator -# -proc gdb_target_sim { } { - global gdb_prompt - global verbose - global exit_status - global target_sim_options - - send_gdb "target sim $target_sim_options\n" - set timeout 60 - verbose "Timeout is now $timeout seconds" 2 - gdb_expect { - -re "Connected to the simulator.*$gdb_prompt $" { - verbose "Set target to sim" - } - timeout { - perror "Couldn't set target for simulator." - cleanup - exit $exit_status - } - } - set timeout 10 - verbose "Timeout is now $timeout seconds" 2 -} - -# -# 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 gdb_prompt - - if [gdb_file_cmd $arg] then { return -1 } - - gdb_target_sim - - send_gdb "load\n" - set timeout 2400 - verbose "Timeout is now $timeout seconds" 2 - gdb_expect { - -re ".*$gdb_prompt $" { - if $verbose>1 then { - send_user "Loaded $arg into $GDB\n" - } - set timeout 30 - verbose "Timeout is now $timeout seconds" 2 - return 1 - } - -re "$gdb_prompt $" { - if $verbose>1 then { - perror "GDB couldn't load." - } - } - timeout { - if $verbose>1 then { - perror "Timed out trying to load $arg." - } - } - } -} |