%
% stack: [ [ . . . ] list-count ]
%
*vaxprest
%
% stack: empty
%
% use the current target Tree container
%
%%% "Default#Targets" *treesafe
%
% cycle through all code
%
Task.@
"_all.tlt" ofbin Tree.Load
root\
%
% stack: empty [ . . . ]
%
_\\ logs
_Values.SearchD
_\
-1
_Values.SearchC
_Values.Flags
%
% stack:
% empty
%  search-text
%   start-index
%    end-index
%     value-name
%      match-flags
%
@^FindValues

%
% stack: empty [ global-val . . . ]
%
tillnull
countup
{
 dup + -1 roll "\" right$ "/" left$ !\
 _\ hier "\" 1 3 1 parse
 ^"#" & ^"#" & &"\" _\ & &"/"
 "ftn" \_ & &"|||"
 exch 1 roll
} for

*vaxpostd
%
% stack: builder
%
*vaxposte