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