diff options
author | Zachary T Welch <zw@superlucidity.net> | 2009-12-06 20:19:18 -0800 |
---|---|---|
committer | Zachary T Welch <zw@superlucidity.net> | 2009-12-06 20:19:18 -0800 |
commit | 2bc4dee7e64662c7ca24b83cfa566bcca68cb3b4 (patch) | |
tree | 857f27b55ab7b625eeb99b40350a8cabf91fbda1 /src | |
parent | 56c5f6361e43113846920552f5a5d2b3147ae16a (diff) | |
download | riscv-openocd-2bc4dee7e64662c7ca24b83cfa566bcca68cb3b4.zip riscv-openocd-2bc4dee7e64662c7ca24b83cfa566bcca68cb3b4.tar.gz riscv-openocd-2bc4dee7e64662c7ca24b83cfa566bcca68cb3b4.tar.bz2 |
allow 'flash_banks' command to give GDB output
The 'flash banks' command produces a list that needs to be formatted
properly for GDB's 'mem info' to work properly. The flash_banks TCL
wrapper provided this formatting, but wrappers no longer work for
second-level commands as they did in the past. With this patch,
the 'flash_banks' command can be used with the new command syntax
and display the required information.
Diffstat (limited to 'src')
-rw-r--r-- | src/flash/startup.tcl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/flash/startup.tcl b/src/flash/startup.tcl index fcebbe0..2c335d9 100644 --- a/src/flash/startup.tcl +++ b/src/flash/startup.tcl @@ -5,7 +5,7 @@ proc flash_banks {} { set i 0 set result "" - foreach {a} [ocd_flash_banks] { + foreach {a} [ocd_flash banks] { if {$i > 0} { set result "$result\n" } |