aboutsummaryrefslogtreecommitdiff
path: root/tcl/test/selftest.cfg
diff options
context:
space:
mode:
Diffstat (limited to 'tcl/test/selftest.cfg')
-rwxr-xr-x[-rw-r--r--]tcl/test/selftest.cfg34
1 files changed, 17 insertions, 17 deletions
diff --git a/tcl/test/selftest.cfg b/tcl/test/selftest.cfg
index d1a00ae..912d1c0 100644..100755
--- a/tcl/test/selftest.cfg
+++ b/tcl/test/selftest.cfg
@@ -1,17 +1,17 @@
-
-add_help_text selftest "run selftest using working ram <tmpfile> <address> <size>"
-
-proc selftest {tmpfile address size} {
-
- for {set i 0} {$i < $size } {set i [expr $i+4]} {
- mww [expr $address+$i] $i
- }
-
- for {set i 0} {$i < 10 } {set i [expr $i+1]} {
- puts "Test iteration $i"
- dump_image $tmpfile $address $size
- verify_image $tmpfile $address bin
- load_image $tmpfile $address bin
- }
-
-} \ No newline at end of file
+
+add_help_text selftest "run selftest using working ram <tmpfile> <address> <size>"
+
+proc selftest {tmpfile address size} {
+
+ for {set i 0} {$i < $size } {set i [expr $i+4]} {
+ mww [expr $address+$i] $i
+ }
+
+ for {set i 0} {$i < 10 } {set i [expr $i+1]} {
+ puts "Test iteration $i"
+ dump_image $tmpfile $address $size
+ verify_image $tmpfile $address bin
+ load_image $tmpfile $address bin
+ }
+
+}