tree_make

one of the documented procedures in this installation of the ACS

Usage:

tree_make xs { node_level "head" }

What it does:

Generates a tree from a level sequence that was returned by a 'connect by' SQL query.

Defined in: /web/philip/tcl/ad-trees.tcl

Source code:


    set root [head $xs]
    set subtrees [map tree_make [tree_group [tail $xs] $node_level]]
    cons $root $subtrees