Сделал так
proc file_fr {files} {
....
set array_of_files(nbf) $not_busy_files_list
set array_of_files(bf) $busy_files_list
return [array get array_of_files]
}
но кажется, что это геморно как-то. Может есть более красивый ход?
Сделал так
proc file_fr {files} {
....
set array_of_files(nbf) $not_busy_files_list
set array_of_files(bf) $busy_files_list
return [array get array_of_files]
}
но кажется, что это геморно как-то. Может есть более красивый ход?