aboutsummaryrefslogtreecommitdiff
path: root/config
diff options
context:
space:
mode:
authorBen Elliston <bje@gnu.org>2003-08-19 00:11:43 +0000
committerBen Elliston <bje@gnu.org>2003-08-19 00:11:43 +0000
commit22b23d35df2026d61cd1fdbd322e13f03d5e09da (patch)
treecadca88120f9f904981c2670c25daa2a6d6ec7a5 /config
parentd8222ca8b95f85467601faf692ec5e391e407e1d (diff)
downloaddejagnu-22b23d35df2026d61cd1fdbd322e13f03d5e09da.zip
dejagnu-22b23d35df2026d61cd1fdbd322e13f03d5e09da.tar.gz
dejagnu-22b23d35df2026d61cd1fdbd322e13f03d5e09da.tar.bz2
Re-indent with Emacs' tcl-mode.
Diffstat (limited to 'config')
-rw-r--r--config/base68k.exp8
-rw-r--r--config/ddb-ether.exp4
-rw-r--r--config/gdb-comm.exp4
-rw-r--r--config/netware.exp2
-rw-r--r--config/sim.exp14
5 files changed, 16 insertions, 16 deletions
diff --git a/config/base68k.exp b/config/base68k.exp
index 65db43c..fdd71d4 100644
--- a/config/base68k.exp
+++ b/config/base68k.exp
@@ -80,8 +80,8 @@ proc base68k_ld { dest prog } {
# dbug has problems if we go into binary mode, so this allows us to
# disable entry into binary mode.
if ![board_info $dest exists no_binary_mode] {
- remote_binary $dest
- }
+ remote_binary $dest
+ }
}
# if we built the srecord on a remote host, copy it back here so we
@@ -147,8 +147,8 @@ proc base68k_ld { dest prog } {
remote_send $dest [board_info $dest download_command]
if [board_info $dest exists download_response] {
remote_expect $dest 5 {
- [board_info $dest download_response] { }
- timeout {
+ [board_info $dest download_response] { }
+ timeout {
perror "Download command never responded."
return "unresolved"
}
diff --git a/config/ddb-ether.exp b/config/ddb-ether.exp
index 05912ab..526ee5c 100644
--- a/config/ddb-ether.exp
+++ b/config/ddb-ether.exp
@@ -92,8 +92,8 @@ proc ddb_ether_ld { dest prog } {
remote_send $dest "\n"
remote_expect $dest 10 {
- -re ".*${shell_prompt}$" { }
- default {
+ -re ".*${shell_prompt}$" { }
+ default {
return "retry"
}
}
diff --git a/config/gdb-comm.exp b/config/gdb-comm.exp
index 5f28393..5bff35f 100644
--- a/config/gdb-comm.exp
+++ b/config/gdb-comm.exp
@@ -107,7 +107,7 @@ proc gdb_comm_file_cmd { arg } {
-re "$gdb_prompt $" {
perror "couldn't load $arg into $GDB."
return -1
- }
+ }
timeout {
perror "couldn't load $arg into $GDB (timed out)."
return -1
@@ -402,7 +402,7 @@ proc gdb_comm_load { dest prog args } {
}
set output ""
-
+
# Now start up the program and look for our magic breakpoints.
# And a whole lot of other magic stuff too.
diff --git a/config/netware.exp b/config/netware.exp
index 7fd79b5..211d9aa 100644
--- a/config/netware.exp
+++ b/config/netware.exp
@@ -151,7 +151,7 @@ proc ${board}_load { dest prog args } {
# Wait a second for the file to "settle" on the NetWare server.
# I've encountered unexplained failures without this delay.
-# sleep 1
+ # sleep 1
# The NetWare remote console expects to be connected to a vt100
diff --git a/config/sim.exp b/config/sim.exp
index 50cc508..db935e4 100644
--- a/config/sim.exp
+++ b/config/sim.exp
@@ -82,13 +82,13 @@ proc sim_load { dest prog args } {
set output ""
- if { [board_info target sim,protocol] == "sid" } {
- set cmd "-e \"set cpu-loader file [list $prog]\""
- } elseif { [board_info target sim,protocol] == "rawsid" } {
- set cmd "--load=$prog"
- } else {
- set cmd $prog
- }
+ if { [board_info target sim,protocol] == "sid" } {
+ set cmd "-e \"set cpu-loader file [list $prog]\""
+ } elseif { [board_info target sim,protocol] == "rawsid" } {
+ set cmd "--load=$prog"
+ } else {
+ set cmd $prog
+ }
# Run the program with a limited amount of real time. While
# this isn't as nice as limiting the amount of CPU time, it