tcl fixes