TCL кажется медленнее, чем набор, при получении значения переменной из переменной с именем переменной

Question

См Tcl 8.4 ниже код и вывод оболочки ниже: (нужно мета- кодирование):

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

Итак, это что set $m и subst $$m имеют одинаковую функциональность. Тем не менее, во время выполнения (в простом TestCase) довольно сильно отличается (см продолжение результатов оболочки ниже:

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

Как можно видеть, установлен в ~ 2,5 быстрее, чем SUBST 2 вопроса:., Чтобы спросить: 1. Почему?
2. Я видел, что это ~ 3,6 быстрее в Tcl 8.5. можно ли ожидать, что это будет оставаться так, в будущих версиях?
Благодаря

Answer 1

Вы можете ожидать вещей, чтобы остаться точно При использовании:

puts [set $m] 

Tcl скомпилирует это сообщение после чтения переменной m (сохраняя результат во внутреннем стеке операций), считывая переменную, имя которой находится в стеке операций, а затем вызов puts с результатом.

Когда вы делаете:

puts [subst $$m] 

Tcl компилирует, что конкатенация $ и результатов чтения m, вызов замены двигателя (который, в свою очередь, будет разобрать и байткод компилировать этот фрагмент) и только затем puts результата. Что совершенно сложнее.

Вы бы увидели разницу, если вы сделали:

set m {k[exit]} 

Первым будет просто сказать вам, что вы пытаетесь читать из (странно названия) переменного, которая не существует. Второй ушел бы из процесса.