layout-line ( wrapped-line y -- )

Vocabulary

ui.gadgets.paragraphs.private

Inputs

wrapped-line	an object
y	an object

Outputs

None

Definition

USING: accessors kernel math sequences ui.baseline-alignment ;

IN: ui.gadgets.paragraphs.private

: layout-line ( wrapped-line y -- )
    [
        words>>
        [ ] [ word-x-coordinates ]
        [ [ key>> ] map align-baselines ] tri
    ] dip [ + layout-word ] curry 3each ;