tcl/interface: replace last deprecated commands

[fw/openocd] / tcl / target / fm4_mb9bf.cfg

diff --git a/tcl/target/fm4_mb9bf.cfg b/tcl/target/fm4_mb9bf.cfg
index e53fdc8787f51906e28c34d66f445fa974c8469a..4bc579cfa7f7714f3655edb7f4d55f6692cf30c2 100644 (file)
--- a/tcl/target/fm4_mb9bf.cfg
+++ b/tcl/target/fm4_mb9bf.cfg
@@ -1,3 +1,5 @@
+# SPDX-License-Identifier: GPL-2.0-or-later
+
 #
 # Spansion FM4 MB9BFxxx (ARM Cortex-M4)
 #
@@ -11,7 +13,7 @@ if { [info exists WORKAREASIZE] } {
        set _WORKAREASIZE 0x8000
 }
 
-$_TARGETNAME configure -work-area-phys [expr 0x20000000 - $_WORKAREASIZE] \
+$_TARGETNAME configure -work-area-phys [expr {0x20000000 - $_WORKAREASIZE}] \
                        -work-area-size $_WORKAREASIZE -work-area-backup 0
 
 set _FLASHNAME $_CHIPNAME.flash