Variáveis globais

comando global Exemplo: proc exemp { } { global gvar ... }
usando arrays para salvar estado global pgmstat set pgmstat(x) 123 set pgmstat(y) 456

comando global Exemplo: proc exemp { } { global gvar ... }