flow

Vocabulary

prettyprint.sections

Class description

A block section printed on its own line if it can fit entirely on one line.

Definition

IN: prettyprint.sections

TUPLE: flow < block ;

Methods

USING: accessors combinators.short-circuit kernel math
prettyprint.sections ;

M: flow short-section?
    {
        [ section-fits? ]
        [ [ end>> 1 - ] [ start>> ] bi - text-fits? not ]
    } 1|| ;