next-line% ( accum lexer -- )

Vocabulary

strings.parser.private

Inputs

accum	an object
lexer	an object

Outputs

None

Definition

USING: kernel kernel.private lexer sbufs sequences ;

IN: strings.parser.private

: next-line% ( accum lexer -- )
    { sbuf lexer } declare
    [ rest-of-line swap push-all ] [ next-line ] bi ;