inset

Vocabulary

prettyprint.sections

Class description

A block section which indents every line when printed as a long-section.

Definition

IN: prettyprint.sections

TUPLE: inset < block narrow? ;

Methods

USING: kernel prettyprint.sections ;

M: inset indent-section? drop t ;


USING: accessors generic kernel prettyprint.sections ;

M: inset long-section
    dup narrow?>>
    [ [ <fresh-line ] pprint-sections ]
    [ M\ inset long-section (call-next-method) ] if ;


USING: kernel prettyprint.sections ;

M: inset newline-after? drop t ;