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 /testsuite/lib/libsup.exp | |
parent | 730d3ca912ec9d19d42285799beaf56a1c0d2252 (diff) | |
download | dejagnu-6b5cde5bf1dfa159ed178e024f81006c5c507cf2.zip dejagnu-6b5cde5bf1dfa159ed178e024f81006c5c507cf2.tar.gz dejagnu-6b5cde5bf1dfa159ed178e024f81006c5c507cf2.tar.bz2 |
Whitespace fixes.
Diffstat (limited to 'testsuite/lib/libsup.exp')
-rw-r--r-- | testsuite/lib/libsup.exp | 18 |
1 files changed, 9 insertions, 9 deletions
diff --git a/testsuite/lib/libsup.exp b/testsuite/lib/libsup.exp index ce5cc84..136ae92 100644 --- a/testsuite/lib/libsup.exp +++ b/testsuite/lib/libsup.exp @@ -4,15 +4,15 @@ # 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 @@ -86,7 +86,7 @@ proc start_expect { } { set EXPECT [findfile $base_dir/../../expect/expect "$base_dir/../../expect/expect" expect] verbose "EXPECT defaulting to $EXPECT" 2 } - + # catch close # catch wait @@ -101,7 +101,7 @@ proc start_expect { } { return -1 } } - + # Load the defaults file exp_send "source ${defaults_file}\n" expect { @@ -121,7 +121,7 @@ proc start_expect { } { # proc stop_expect { } { global spawn_id - + # make expect exit exp_send "exit\n" catch "close -i $spawn_id" @@ -150,7 +150,7 @@ proc load_test_lib { lib } { # proc exp_test { cmd pattern msg } { global spawn_id - + exp_send "puts ACK ; $cmd ; puts NAK\r\n" expect { "puts ACK*puts NAK" { @@ -160,7 +160,7 @@ proc exp_test { cmd pattern msg } { warning "Never got command echo" } } - + expect { "ACK" { exp_continue @@ -198,7 +198,7 @@ proc config_test { cmd true false msg } { warning "Never got command echo" } } - + expect { -re "Checking pattern*with*\[\r\n\]" { exp_continue |