%
% search object found in node name, add to the global tree url list
%
*trglobas
%
% stack: empty [ . . . . ] tree-global
%
_@
%
% add the tree pep name and hier path to the current task tree
%
%
% stack: empty [ . . . . ] tree-global cur-tree
%
dup "#" "\" replall
_\ hier
/*
"\" slice exch
"endtree " log()
third "\" Str.RevRight
"root " log()
 second eq$
{
 pop
 ^"\" &
}
{
 parens &"\" ^ &
} ifelse
*/

"\" Str.Right
^"\" &

%
% stack: empty [ . . . . ] tree-global cur-tree tree-hier
%
*trxlistf
!@