?handle-string ( sequence-parser string -- sequence-parser string/f )

Vocabulary

lint.vocabs.private

Inputs

sequence-parser	an object
string	an object

Outputs

sequence-parser	an object
string/f	an object

Definition

USING: combinators.short-circuit kernel sequences ;

IN: lint.vocabs.private

: ?handle-string
    ( sequence-parser string -- sequence-parser string/f )
    dup { [ empty? not ] [ string-literal? ] } 1&&
    [ skip-string f ] when ;