TCL с использованием пространства имен в применить

Question

у меня есть код ниже

set result {} 
apply {x {expr {$x*100}} ns2} {1,2,4} 

В приведенной выше коде, что является важностью имен, как я могу использовать переменное пространство имен или хранить результат пространства имен

Answer 1

Давайте пространство имен и переменное пространство имен:

% namespace eval example {variable result 0} 

Используйте команду variable объявить имя result быть переменным пространство имен в лямбда:

% apply {x {variable result ; set result [expr {$x * 100}]}} 3 
% set ::example::result 
# => 0 
% set ::result 
# => 300 

Лямбда использовала глобальное пространство имен, так как мы не указали какое-либо пространство имен.

% apply {x {variable result ; set result [expr {$x * 100}]} ::example} 3 
% set ::example::result 
# => 300 

И вот оно.

Документация: * (operator), apply, expr, namespace, set, variable