tcl: [1/3] prepare for jimtcl 0.81 'expr' syntax change

[fw/openocd] / tcl / board / mcb1700.cfg

diff --git a/tcl/board/mcb1700.cfg b/tcl/board/mcb1700.cfg
index 01080a0b16b560c9815aed45efc02cfee475fe65..a5e19024a9afbc1fb21ea10f0d2bd640e275a1f6 100644 (file)
--- a/tcl/board/mcb1700.cfg
+++ b/tcl/board/mcb1700.cfg
@@ -55,7 +55,7 @@ $_TARGETNAME configure -event reset-init {
        #
        #
        global MCB1700_CCLK
-       adapter speed [expr $MCB1700_CCLK / 8]
+       adapter speed [expr {$MCB1700_CCLK / 8}]
 
        # Do not remap 0x0000-0x0020 to anything but the flash (i.e. select
        # "User Flash Mode" where interrupt vectors are _not_ remapped,