当从具有变量名称的变量中获取变量值时，tcl 的 subst 似乎比 set 慢

Question

参见下面的 Tcl 8.4 代码和下面的 shell 输出：（我需要元编码）：

% set k a
% set m k
% puts [set $m ]
a
% puts [subst $$m]
a

因此，set $m 和 subst $$m 似乎具有相同的功能。但是，运行时（在简单的测试用例中）是相当不同的（请参阅下面的 shell 结果的延续：

% time { set $m } 1000000
0.256435 microseconds per iteration
% time { subst $$m } 1000000
0.627714 microseconds per iteration

可以看出，set 比 subst 快约 2.5。 2个问题是： 待问： 1. 为什么？
2. 我已经看到它在 Tcl 8.5 中快了 ~3.6。我们能否期望在未来的版本中保持这种情况？
谢谢

Answer 1

您可以期望事情保持不变。使用时：

puts [set $m]

Tcl 将编译一次以读取 m 变量（将结果存储在内部操作堆栈上）读取名称在操作堆栈上的变量，然后调用 puts 并使用结果。

当你这样做时：

puts [subst $$m]

Tcl 将其编译为$ 的串联和读取m 的结果，调用替换引擎（依次解析和字节码编译该片段），然后才得到结果的puts .哪个更复杂。

如果你这样做了，你会看到不同的：

set m {k[exit]}

第一个只会告诉你你试图从一个不存在的（奇怪命名的）变量中读取。第二个将退出该过程。