X-Git-Url: https://review.openocd.org/gitweb?p=openocd.git;a=blobdiff_plain;f=tcl%2Fcpu%2Farc%2Fv2.tcl;fp=tcl%2Fcpu%2Farc%2Fv2.tcl;h=364e8af37e7b8b8ade429820c325b7fe42b3a9b3;hp=a3172c220a1d918b20aae8286db775eaa9b98bfb;hb=f5657aa76e795e4ed5b13a9f5df943181a123e49;hpb=82b6a41117fa99e760681d9f31163e7b68357e71

diff --git a/tcl/cpu/arc/v2.tcl b/tcl/cpu/arc/v2.tcl
index a3172c220a..364e8af37e 100644
--- a/tcl/cpu/arc/v2.tcl
+++ b/tcl/cpu/arc/v2.tcl
@@ -41,7 +41,7 @@ proc arc_v2_examine_target { {target ""} } {
 			# 0b01 - 4 actionpoints
 			# 0b10 - 8 actionpoints
 			# 0b11 - reserved.
-			set ap_num [expr 0x2 << ($ap_build_type & 3)]
+			set ap_num [expr {0x2 << ($ap_build_type & 3)}]
 			# Expression on top may produce 16 action points - which is a
 			# reserved value for now.
 			if { $ap_num < 16 } {
@@ -341,6 +341,6 @@ proc arc_v2_reset { {target ""} } {
 	# to write directly via JTAG layer...
 	set num_ap [arc num-actionpoints]
 	for {set i 0} {$i < $num_ap} {incr i} {
-		arc jtag set-aux-reg [expr 0x222 + $i * 3] 0
+		arc jtag set-aux-reg [expr {0x222 + $i * 3}] 0
 	}
 }