Add asynch.tcl so we can debug.