split-and-pad ( text -- lines )

Vocabulary

rosetta.align-columns

Inputs

text

an object

Outputs

lines

an object

Definition

USING: kernel sequences splitting ;

IN: rosetta.align-columns

: split-and-pad ( text -- lines )
    split-lines [ "$" split harvest ] map dup longest length
    [ "" pad-tail ] curry map ;