parse-raw ( lexer -- str/f )

Vocabulary

lexer

Inputs

lexer

an object

Outputs

str/f

an object

Definition

USING: kernel ;

IN: lexer

: parse-raw ( lexer -- str/f )
    dup still-parsing? [
        dup skip-blank dup still-parsing-line?
        [ (parse-raw) ] [ dup next-line parse-raw ] if
    ] [ drop f ] if ;