diff options
author | Spencer Oliver <ntfreak@users.sourceforge.net> | 2009-10-26 22:39:24 +0000 |
---|---|---|
committer | Spencer Oliver <ntfreak@users.sourceforge.net> | 2009-10-26 22:39:24 +0000 |
commit | 8f3b28ff4199a64d6f7aff1584a48f18661969ae (patch) | |
tree | fbc3eba13868ec8ebf12cd3a0c2d1a8aafb5ae38 /tcl/test | |
parent | d87ee640c7a8e77a34d2d72185be157a97b39061 (diff) | |
download | riscv-openocd-8f3b28ff4199a64d6f7aff1584a48f18661969ae.zip riscv-openocd-8f3b28ff4199a64d6f7aff1584a48f18661969ae.tar.gz riscv-openocd-8f3b28ff4199a64d6f7aff1584a48f18661969ae.tar.bz2 |
Fix incorrect line endings
Signed-off-by: Spencer Oliver <ntfreak@users.sourceforge.net>
Diffstat (limited to 'tcl/test')
-rwxr-xr-x[-rw-r--r--] | tcl/test/selftest.cfg | 34 |
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 + } + +} |