do-indent ( -- )

Vocabulary

prettyprint.sections

Word description

Outputs the current indent nesting to output-stream.

Definition

USING: accessors io math namespaces strings ;

IN: prettyprint.sections

: do-indent ( -- )
    pprinter get indent>> [ 32 <string> write ] unless-zero ;