问tcl中的变量替换

EN

我正在运行一个已嵌入到另一个系统中的TCL8.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这样做的正确方式是什么？