TCL & uplevel

perintah uplevel digunakan untuk menjalankan perintah2 yang berada di
stack frame yang berbeda, stack frame telah dijelaskan di
http://inthegarage.wordpress.com/2007/06/13/tcl-upvar/,
Mungkin lebih baik langsung pada contoh

proc a {} {
set x 10
set y 20

b
}

proc b {} {
uplevel 1 {set x 20; puts "nilai dari [...]