aboutsummaryrefslogtreecommitdiff
path: root/tcl/board/dm355evm.cfg
diff options
context:
space:
mode:
authorAntonio Borneo <borneo.antonio@gmail.com>2021-04-10 18:28:52 +0200
committerAntonio Borneo <borneo.antonio@gmail.com>2021-05-08 09:49:08 +0100
commit64d89d5ee1a554fbae8eb0a7231ccb2dc4428c1a (patch)
tree27b37e970a5b140d3e15968773629edeefdee33d /tcl/board/dm355evm.cfg
parentf855fdcf0d95ff9ba18a83f9a97d5368844d4f2c (diff)
downloadriscv-openocd-64d89d5ee1a554fbae8eb0a7231ccb2dc4428c1a.zip
riscv-openocd-64d89d5ee1a554fbae8eb0a7231ccb2dc4428c1a.tar.gz
riscv-openocd-64d89d5ee1a554fbae8eb0a7231ccb2dc4428c1a.tar.bz2
tcl: [3/3] prepare for jimtcl 0.81 'expr' syntax change
Jimtcl commit 1843b79a03dd ("expr: TIP 526, only support a single arg") drops the support for multi-argument syntax for the TCL command 'expr'. Fix manually the remaining lines that don't match simple patterns and would require dedicated boring scripting. Remove the 'expr' command where appropriate. Change-Id: Ia75210c8447f88d38515addab4a836af9103096d Signed-off-by: Antonio Borneo <borneo.antonio@gmail.com> Reviewed-on: http://openocd.zylin.com/6161 Tested-by: jenkins Reviewed-by: Tomas Vanek <vanekt@fbl.cz>
Diffstat (limited to 'tcl/board/dm355evm.cfg')
-rw-r--r--tcl/board/dm355evm.cfg2
1 files changed, 1 insertions, 1 deletions
diff --git a/tcl/board/dm355evm.cfg b/tcl/board/dm355evm.cfg
index 1e35b68..bf5659c 100644
--- a/tcl/board/dm355evm.cfg
+++ b/tcl/board/dm355evm.cfg
@@ -87,7 +87,7 @@ proc dm355evm_init {} {
mmw $addr 0x2000 0
# wait for READY
- while { [expr [mrw $addr] & 0x8000] == 0 } { sleep 1 }
+ while { [expr {[mrw $addr] & 0x8000}] == 0 } { sleep 1 }
# set IO_READY; then LOCK and PWRSAVE; then PWRDN
mmw $addr 0x4000 0