История изменений

Исправление Xenius, 16.10.15 21:28 (текущая версия) :

Наверное, так:

proc ::ds::Interpret_vtkCylinderSource {e} {
    set g {dict get $e} 
    set Name [{*}$g Name]
    set Class [{*}$g Class]
}

Если у тебя Tcl 8.6 то можно ещё применить лямбду и apply

Исходная версия Xenius, 16.10.15 21:27:

Наверное, так:

proc ::ds::Interpret_vtkCylinderSource {e} {
    set g {key} {dict get $e} 
    set Name [{*}$g Name]
    set Class [{*}$g Class]
}

Если у тебя Tcl 8.6 то можно ещё применить лямбду и apply