{"size": 631, "ext": "scrbl", "max_stars_repo_path": "doc/utils/text/tree.scrbl", "max_stars_repo_name": "david135/sagittarius-scheme", "max_stars_repo_stars_event_min_datetime": "2015-11-07T07:13:35.000Z", "max_stars_repo_stars_event_max_datetime": "2022-02-15T03:35:14.000Z", "max_issues_repo_path": "doc/utils/text/tree.scrbl", "max_issues_repo_name": "david135/sagittarius-scheme", "max_issues_repo_issues_event_min_datetime": "2016-04-28T21:59:59.000Z", "max_issues_repo_issues_event_max_datetime": "2021-07-01T08:42:21.000Z", "max_forks_repo_path": "doc/utils/text/tree.scrbl", "max_forks_repo_name": "david135/sagittarius-scheme", "max_forks_repo_forks_event_min_datetime": "2016-12-28T12:41:23.000Z", "max_forks_repo_forks_event_max_datetime": "2020-02-26T20:52:02.000Z"}
{"max_stars_count": 39, "max_issues_count": 3, "max_forks_count": 4, "avg_line_length": 33.2105263158, "max_line_length": 78, "alphanum_fraction": 0.7210776545}
@; -*- coding: utf-8 -*-

@subsection[:tag "text.tree"]{(text tree) - Lightweight text generation}

@define[Library]{@name{(text tree)}}
@desc{Defines simple but commonly used functions for a text construction.

This library is ported from Gauche.
}

@define[Generic]{@name{write-tree} @args{tree :optional out}}
@desc{Write out an @var{tree} as a tree of text, to the output port @var{out}.
If the @var{out} is omitted, then current output port is used.
}

@define[Function]{@name{tree->string} @args{tree}}
@desc{Just calls the @code{write-tree} method for @var{tree] using an output
string port, and returns the result string.
}