Posted to tcl by kbk at Tue Feb 23 21:48:06 GMT 2021view pretty

namespace eval ::ns {}
puts "scheduling wakeup"
after 10000 {
    puts "after fires"
    set ::ns::foo hello
}
puts "waiting for ::ns::foo"
vwait ::ns::foo
puts "done waiting"
puts $::ns::foo