added more tcl tests