Evaluated proc depends_check mylist { set out [list]; map $mylist {x { if {[safe_inspect $x] != ""} {lappend out $x} }} }