%
% stack: wild-spec
%
sel@
_\\ exch
*allsnaps
root\
seek*
{
 !\
}
{
 root\
} ifelse
select*