Насколько я понимаю, в tcl, если вы хотите передать именованный массив в функцию, вы должны получить доступ к верхней области вызывающей стороны через upvar команда внутри тела вызываемого. Это единственный способ передать массив в tcl?