如何在TCL中做+ =

Question

set windowSize 0

for {set i 0} {$i < 14} {incr i} {
  set $windowSize [expr $windowSize + [$tcp($i) set cwnd_]]
}
puts "$windowSize"

当添加的值不为零时，将打印出零。没有temp var怎么做？霍拉，如果你喜欢TCL。 ......沉默。

Answer 1

在运行命令之前，

set $windowSize会替换$windowSize的值。

您想要set windowSize [expr ...]，甚至更简单：

incr windowSize [$tcp($i) set cwnd_]