tcl 中的变量替换

Question

我正在运行已嵌入到另一个系统中的 tcl 8.5 化身。 该系统将接受并正确执行以下命令：

uniformDist  minAndMax  {1 10}

uniformDist 是我没有内部可见性的某个对象。

我希望能够说类似的话：

set M 1000
uniformDist  minAndMax  {1 M}

但这不起作用。 也没有 设置 M 1000 uniformDist minAndMax {1 $M}

我试过了：

u minAndMax {1 [eval $M]}

和

u minAndMax {1 [eval M]}

这些都不起作用。

错误信息是：

期望一个真实值：无法转换自：“$M”错误：预期 更少的参数[解析对时出错]

或

期望一个真实值：无法转换自：“[eval”错误：预期 更少的参数[解析对时出错]

tcl 这样做的正确方法是什么？

Answer 1

变量替换使用$ 和变量名称（例如$M 或${M}）表示。

这不起作用：

uniformDist  minAndMax  {1 $M}

因为大括号防止替换：$M 只是（子）字符串“美元，大写 m”。

这行得通：

uniformDist  minAndMax  [list 1 $M]

因为 list 的参数将在列表 {1 1000} 返回并传递给 uniformDist 之前进行评估。

"1 $M" 的形式也可以使用，并且可以使用命令替换 [set M] 代替上面的变量替换。

文档： Summary of Tcl language syntax