У меня есть такой скрипт: proc subProc1 { } { puts $var1 } proc subProc2 { } { puts $var2 } proc mainProc { args } { # Define many variables subProc1 subProc2 #etc. } Я хотел бы, чтобы subProc1 и subProc2 имели...

Рассмотрим следующую ситуацию: namespace eval ::mydialog {} proc ::mydialog::show {w varName args} { upvar 1 $varName theVar # now I can access theVar # (1) # code defining/creating my window # here some widgets for user...

Я хочу написать функцию, аналогичную встроенной read , где я передаю имя переменной в качестве аргумента, а функция возвращает свой результат в названную переменную. Я пытался сделать это так: GLOBAL_VAR=0 foo() { local var="$1";...