block design tcl gets called at end