read-quot-step ( lines -- quot/f )

Vocabulary

listener

Inputs

lines

an object

Outputs

quot/f

an object

Definition

USING: accessors continuations kernel lexer ;

IN: listener

: read-quot-step ( lines -- quot/f )
    [ parse-lines-interactive ] curry
    [ error>> unexpected-eof? ] ignore-error/f ;