tcl: replace the deprecated commands with "adapter ..."

[openocd.git] / tcl / target / tmpa900.cfg

diff --git a/tcl/target/tmpa900.cfg b/tcl/target/tmpa900.cfg
index 90851f69cb4f06c770bc4a1408a50d9c6e47974b..8e70700201cb38a21b3ac8804cfb88430bff096a 100644 (file)
--- a/tcl/target/tmpa900.cfg
+++ b/tcl/target/tmpa900.cfg
@@ -3,21 +3,17 @@
 ######################################
 
 if { [info exists CHIPNAME] } {
-   set  _CHIPNAME $CHIPNAME
+   set _CHIPNAME $CHIPNAME
 } else {
-   set  _CHIPNAME tmpa900
+   set _CHIPNAME tmpa900
 }
 
-if { [info exists ENDIAN] } {
-   set  _ENDIAN $ENDIAN
-} else {
-   set  _ENDIAN little
-}
+# Toshiba TMPA900 series MCUs are always little endian as per datasheet.
+set _ENDIAN little
 
-if { [info exists CPUTAPID ] } {
+if { [info exists CPUTAPID] } {
    set _CPUTAPID $CPUTAPID
 } else {
-  # force an error till we get a good number
    set _CPUTAPID 0x07926031
 }
 
@@ -32,7 +28,7 @@ jtag newtap $_CHIPNAME cpu -irlen 4 -ircapture 0x1 -irmask 0xf -expected-id $_CP
 
 #use combined on interfaces or targets that can't set TRST/SRST separately
 reset_config trst_and_srst
-adapter_nsrst_delay 20
+adapter srst delay 20
 jtag_ntrst_delay 20
 
 ######################