<long-section ( section -- )

Vocabulary

prettyprint.sections

Inputs

section

a section

Outputs

None

Word description

Begins printing a long section, taking indent-section? and unindent-first-line? into account.

Definition

USING: kernel ;

IN: prettyprint.sections

: <long-section ( section -- )
    dup unindent-first-line?
    [ dup <fresh-line <indent ] [ dup <indent <fresh-line ] if ;