tcl/target/imx8m: use hwthread rtos
[fw/openocd] / tcl / target / hilscher_netx500.cfg
index 93375fd819f65f85198dcbb5da49b5936c874ae6..131bef2217a20991329fcf49ca4878a7a04269f7 100644 (file)
@@ -26,9 +26,7 @@ set _TARGETNAME $_CHIPNAME.cpu
 target create $_TARGETNAME arm926ejs -endian $_ENDIAN -chain-position $_TARGETNAME
 
 proc mread32 {addr} {
-  set value(0) 0
-  mem2array value 32 $addr 1
-  return $value(0)
+  return [read_memory $addr 32 1]
 }
 
 # This function must be called on netX100/500 right after halt
@@ -36,10 +34,10 @@ proc mread32 {addr} {
 proc sdram_fix { } {
 
   set accesskey [mread32 0x00100070]
-  mww 0x00100070 [expr $accesskey]
+  mww 0x00100070 $accesskey
   mww 0x0010002c 0x00000001
 
-  if {[expr [mread32 0x0010002c] & 0x07] == 0x07} {
+  if {[expr {[mread32 0x0010002c] & 0x07}] == 0x07} {
         puts "SDRAM Fix was not executed. Probably your CPU halted too late and the register is already locked!"
   } else {
         puts "SDRAM Fix succeeded!"