Tcl: recurse for []