diff options
| author | oharboe <oharboe@b42882b7-edfa-0310-969c-e2dbd0fdcd60> | 2008-07-16 12:44:00 +0000 |
|---|---|---|
| committer | oharboe <oharboe@b42882b7-edfa-0310-969c-e2dbd0fdcd60> | 2008-07-16 12:44:00 +0000 |
| commit | ffe9257a1766ece36a75a4b33d9fa6959182e970 (patch) | |
| tree | 0a01eeac39a566935c936d4dbb9a98f381769578 /src/startup.tcl | |
| parent | f806c8deabfcfa58340c3f1a136d1324faf51e17 (diff) | |
| download | openocd_libswd-ffe9257a1766ece36a75a4b33d9fa6959182e970.tar.gz openocd_libswd-ffe9257a1766ece36a75a4b33d9fa6959182e970.tar.bz2 openocd_libswd-ffe9257a1766ece36a75a4b33d9fa6959182e970.tar.xz openocd_libswd-ffe9257a1766ece36a75a4b33d9fa6959182e970.zip | |
flash_banks now follow OpenOCD scripting API rules
git-svn-id: svn://svn.berlios.de/openocd/trunk@814 b42882b7-edfa-0310-969c-e2dbd0fdcd60
Diffstat (limited to 'src/startup.tcl')
| -rw-r--r-- | src/startup.tcl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/startup.tcl b/src/startup.tcl index 1f1d1e21..5fe7c8fe 100644 --- a/src/startup.tcl +++ b/src/startup.tcl @@ -46,7 +46,7 @@ proc flash_banks_pretty {} { if {$i > 0} { set result "$result\n" } - set result [format "$result#%d: %s at 0x%08x, size 0x%08x, buswidth %d, chipwidth %d" $i [lindex $a 0] [lindex $a 1] [lindex $a 2] [lindex $a 3] [lindex $a 4]] + set result [format "$result#%d: %s at 0x%08x, size 0x%08x, buswidth %d, chipwidth %d" $i $a(name) $a(base) $a(size) $a(bus_width) $a(chip_width)] set i [expr $i+1] } return $result |