%
% replace tree hierarchy below root with lint analysis tree
%
*unrootch
_functions dup "functions" dup !group \!
_\ _group newchild
exch execstr countup
{
 !ordinal !function !module !where
 _\ _function newchild
 _group "type" \!
 _ordinal "ordinal" \!
 _module "module" \!
 _where "where" \!
 !\
} for
!\

 _parameters dup "parameters" dup !group \!
_\ _group newchild
exch execstr countup
{
 !ordinal !parameter !module !where
 _\ _parameter newchild
 _group "type" \!
 _ordinal "ordinal" \!
 _module "module" \!
 _where "where" \!
 !\
} for
!\
_variables dup "variables" dup !group \!
_\ _group newchild
exch execstr countup
{
 !ordinal !variable !module !where
 _\ _variable newchild
 _group "type" \!
 _ordinal "ordinal" \!
 _module "module" \!
 _where "where" \!
 !\
} for
!\
_globals dup "globals" dup !group \!
_\ _group newchild
exch execstr countup
{
 !ordinal !global !module !where
 _\ _global newchild
 _group "type" \!
 _ordinal "ordinal" \!
 _module "module" \!
 _where "where" \!
 !\
} for
!\
_exceptions dup "exceptions" dup !group \!
_\ _group newchild
exch execstr countup
{
 !ordinal !exception !module !where
 _\ _exception newchild
 _group "type" \!
 _ordinal "ordinal" \!
 _module "module" \!
 _where "where" \!
 !\
} for
!\
_errors dup "errors" dup !group \!
_\ _group newchild
exch execstr countup
{
 !ordinal !source !error !module !token !where
 _\ _token newchild
 _group "type" \!
 _ordinal "ordinal" \!
 _source "source" \!
 _error "error" \!
 _module "module" \!
 _where "where" \!
 !\
} for
!\
_props dup "props" dup !group \!
_\ _group newchild
exch execstr countup
{
 !ordinal !prop
 _\ _prop newchild
 _group "type" \!
 _ordinal "ordinal" \!
 !\
} for
!\
_indexer dup "indexer" dup !group \!
_\ _group newchild
exch execstr countup
{
 !ordinal !exact !flag !index
 _\ _index newchild
 _group "type" \!
 _ordinal "ordinal" \!
 _flag "flag" \!
 _exact "exact" \!
 !\
} for
!\