Posted to tcl by kyak at Thu Nov 08 17:17:57 GMT 2018view pretty

proc loop {} {
        #do things
        after 2000
        tailcall loop
}

loop
vwait forever