diff options
author | Ben Elliston <bje@gnu.org> | 2003-08-16 13:08:57 +0000 |
---|---|---|
committer | Ben Elliston <bje@gnu.org> | 2003-08-16 13:08:57 +0000 |
commit | 6b5cde5bf1dfa159ed178e024f81006c5c507cf2 (patch) | |
tree | bba61f1236bad2fb18d320ea4e4d4e7e22eaf45d /lib/kermit.exp | |
parent | 730d3ca912ec9d19d42285799beaf56a1c0d2252 (diff) | |
download | dejagnu-6b5cde5bf1dfa159ed178e024f81006c5c507cf2.zip dejagnu-6b5cde5bf1dfa159ed178e024f81006c5c507cf2.tar.gz dejagnu-6b5cde5bf1dfa159ed178e024f81006c5c507cf2.tar.bz2 |
Whitespace fixes.
Diffstat (limited to 'lib/kermit.exp')
-rw-r--r-- | lib/kermit.exp | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/lib/kermit.exp b/lib/kermit.exp index ed31f40..d51b6e2 100644 --- a/lib/kermit.exp +++ b/lib/kermit.exp @@ -4,21 +4,21 @@ # 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. +# Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. # Please email any bugs, comments, and/or additions to this file to: # bug-dejagnu@gnu.org # -# Connect to DEST using kermit. Note that we're just using kermit as a +# Connect to DEST using kermit. Note that we're just using kermit as a # simple serial or network connect program; we don't actually use Kermit # protocol to do downloads. # returns -1 if it failed, otherwise it returns @@ -41,7 +41,7 @@ proc kermit_open { dest args } { set port [board_info ${dest} netport] set device "-j [board_info ${dest} netport]" } - + set tries 0 set result -1 verbose "kermit $device" @@ -52,7 +52,7 @@ proc kermit_open { dest args } { } expect { - -re ".*ermit.*>.*$" { + -re ".*ermit.*>.*$" { send "c\n" expect { -re "Connecting to.*$port.*Type the escape character followed by C to.*options.*\[\r\n\]$" { @@ -78,7 +78,7 @@ proc kermit_open { dest args } { exp_continue } } - timeout { + timeout { warning "Timed out trying to connect." set result -1 incr tries |