?split-lines ( str -- seq )

Vocabulary

documents.private

Inputs

str

an object

Outputs

seq

an object

Definition

USING: kernel sequences splitting ;

IN: documents.private

: ?split-lines ( str -- seq )
    [ split-lines ] keep ?last [ "\r\n" member? ] [ t ] if*
    [ "" suffix ] when ;