tcl 和数组中的预期布尔值错误

Question

我的串口 tcl 应用程序进展缓慢，但遇到了另一面墙。

我想创建一个布尔值数组以在 for 循环中进行迭代。

在 for 循环中，DTR 将发送一个串行输出。

下面我有以下代码：

set rs232 [open COM3: r]
fconfigure $rs232 -ttycontrol {DTR 0}

array set values {
0   0
1   1
}

set n [array size values]

set x 0
for {set a 0} {$a <=15} {incr a} {
fconfigure $rs232 -ttycontrol {DTR $values(0)}
wait 1000
fconfigure $rs232 -ttycontrol {DTR $values(1)}
wait 1000
}

我运行它并得到错误：

    expected boolean value but got "$values(0)"

谁能告诉我这是为什么，我该如何解决？

Answer 1

此调用：

fconfigure $rs232 -ttycontrol {DTR $values(0)}

将-ttycontrol 的值“DTR $values(0)”传递给fconfigure。调用

fconfigure $rs232 -ttycontrol [list DTR $values(0)]

通过“DTR 0”。

大括号阻止了变量的替换，但list 的调用会强制执行它。

或者，您可以使用其中之一

fconfigure $rs232 -ttycontrol "DTR $values(0)"
fconfigure $rs232 -ttycontrol [subst {DTR $values(0)}]