如何在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_]