问如何在调用“`source`”命令时传递参数

EN

在使用C或C++执行此操作时，您应该：

1. 初始化Tcl库并创建一个Tcl解释器。
2. 将全局变量argv0、argv和argc设置为普通Tcl脚本所期望的值。这正是tclsh所做的；除了以这种方式初始化之外，变量完全是普通的。
   • argv0是“主”脚本的名称，可能是您将要使用source的脚本。
   • argv是所有其他参数的Tcl列表；argc是该列表的长度。

​

1. 使用Tcl_FSEvalFileEx(interp,pathPtr,encoding)执行文件；source命令是该调用的一个非常薄的包装器。您可能希望将编码参数作为NULL传递，而pathPtr参数是Tcl_Obj引用。

如果您的脚本接受argv中的参数，只需在源脚本之前设置这个变量。

但是，如果这个脚本调用exit，它将终止整个进程，通常不是您想要的。你可以用奴隶插足来避免这件事。

有3个预定义变量：

$argc - number items of arguments passed to a script.
$argv - list of the arguments.
$argv0 - name of the script.

因此，在您的示例中，假设文件源位于同一个目录中，并且将其名称作为第一个参数传递：

source [lindex $argv 0]