tcl: replace the deprecated commands with "adapter ..."
Avoid annoying "deprecated" messages while running the scripts distributed with OpenOCD code. Change automatically created with commands sed -i 's/adapter_khz/adapter speed/g' $(find tcl/ -type f) sed -i 's/adapter_nsrst_delay/adapter srst delay/g' $(find tcl/ -type f) sed -i 's/adapter_nsrst_assert_width/adapter srst pulse_width/g' $(find tcl/ -type f) Minor indentation issue fixed manually in tcl/board/at91sam9g20-ek.cfg tcl/target/at91sam9260_ext_RAM_ext_flash.cfg Change-Id: I425fd56c0c88cd6b06124621306eeb89166dfe71 Signed-off-by: Antonio Borneo <borneo.antonio@gmail.com> Reviewed-on: http://openocd.zylin.com/5284 Tested-by: jenkins Reviewed-by: Oleksij Rempel <linux@rempel-privat.de>
This commit is contained in:
committed by
Oleksij Rempel
parent
0d598535a3
commit
38ac08c1c2
@@ -36,7 +36,7 @@ jtag newtap $_CHIPNAME.fpga tap -irlen 10 -ircapture 0x01 -irmask 0x3 -expected-
|
||||
# core 1 - 0x80112000
|
||||
|
||||
# Slow speed to be sure it will work
|
||||
adapter_khz 1000
|
||||
adapter speed 1000
|
||||
|
||||
set _TARGETNAME1 $_CHIPNAME.cpu.0
|
||||
set _TARGETNAME2 $_CHIPNAME.cpu.1
|
||||
@@ -46,7 +46,7 @@ dap create $_CHIPNAME.dap -chain-position $_CHIPNAME.cpu
|
||||
target create $_TARGETNAME1 cortex_a -dap $_CHIPNAME.dap \
|
||||
-coreid 0 -dbgbase 0x80110000
|
||||
|
||||
$_TARGETNAME1 configure -event reset-start { adapter_khz 1000 }
|
||||
$_TARGETNAME1 configure -event reset-start { adapter speed 1000 }
|
||||
$_TARGETNAME1 configure -event reset-assert-post "cycv_dbginit $_TARGETNAME1"
|
||||
|
||||
|
||||
@@ -54,7 +54,7 @@ $_TARGETNAME1 configure -event reset-assert-post "cycv_dbginit $_TARGETNAME1"
|
||||
#target create $_TARGETNAME2 cortex_a -dap $_CHIPNAME.dap \
|
||||
# -coreid 1 -dbgbase 0x80112000
|
||||
|
||||
#$_TARGETNAME2 configure -event reset-start { adapter_khz 1000 }
|
||||
#$_TARGETNAME2 configure -event reset-start { adapter speed 1000 }
|
||||
#$_TARGETNAME2 configure -event reset-assert-post "cycv_dbginit $_TARGETNAME2"
|
||||
|
||||
proc cycv_dbginit {target} {
|
||||
|
||||
Reference in New Issue
Block a user