X-Git-Url: https://review.openocd.org/gitweb?p=openocd.git;a=blobdiff_plain;f=tcl%2Ftarget%2Fstm32wlx.cfg;h=fafe9bcbacdc8a15b7a163974c270fe17f23e9c5;hp=edb3fb32b424461ccaaff8411f2eeae6b66a73b7;hb=c3993d3188da5976a64f47d4cbf4d7e5b63f0c8d;hpb=2f424b7eb776b3d32f2b58a3ffd91ff1d5657404

diff --git a/tcl/target/stm32wlx.cfg b/tcl/target/stm32wlx.cfg
index edb3fb32b4..fafe9bcbac 100644
--- a/tcl/target/stm32wlx.cfg
+++ b/tcl/target/stm32wlx.cfg
@@ -151,7 +151,7 @@ proc stm32wlx_get_chipname {} {
 	if {$sep == -1} {
 		return $t
 	}
-	return [string range $t 0 [expr $sep - 1]]
+	return [string range $t 0 [expr {$sep - 1}]]
 }
 
 # like mrw, but with target selection