我已经使用 putenv 通过我的代码设置了环境变量。我正在通过 tcl 文件读取环境变量。看来,在Windows中这显示了以下内容 错误:无法读取“env(myvar)”:没有这样的变量, 没有这样的变量 (读取“env(myvar)”上的跟踪) 从内部调用 “放置 $env(myar)”
但在 Linux 中,错误不会出现。
putenv用于设置环境变量 $env() 在 tcl 文件中用于获取 env。
最佳答案
这是已知的,并且是由于以下事实引起的:如果我们更精确地同步,则从 Tcl 对环境变量的所有访问都会产生更大的性能损失,并且这是比从 C 代码更改环境变量的情况更常见的用例。 (putenv()
系统调用没有给我们任何可以有效地 Hook 来检测更改的内容,因此我们最终不得不从头开始重新组装整个 env
数组;这被发现是一个重要的瓶颈。)
最简单的解决方法是在 Tcl 中创建一个额外的命令(但用 C 编写),直接包装 getenv()
调用,以便您可以将其与您怀疑可能已在 Tcl 背后更改的环境变量一起使用。
int WrapGetEnv(ClientData ignored, Tcl_Interp *interp, int argc, char *argv[]) {
if (argc != 2) {
// Probably ought to be a better error here
return TCL_ERROR;
}
char *var = argv[1];
char *val = getenv(var);
if (val != NULL) {
Tcl_SetResult(interp, val, TCL_DYNAMIC);
}
return TCL_OK;
}
// ... in the right place do this ...
Tcl_CreateCommand(interp, "getenv", WrapGetEnv, NULL, NULL);
关于c++ - tcl 文件无法获取通过代码设置的环境变量,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/55335551/