pprint-section ( section -- )

Vocabulary

prettyprint.sections

Inputs

section

a section

Outputs

None

Generic word contract

Prints a section, performing wrapping and indentation using available formatting information.

Notes

This word should only be called from inside the with-pprint combinator.

Definition

USING: accessors io.styles kernel ;

IN: prettyprint.sections

: pprint-section ( section -- )
    dup short-section?
    [ dup style>> [ short-section ] with-style ] [
        [ <long-section ]
        [ dup style>> [ long-section ] with-style ]
        [ long-section> ] tri
    ] if ;