grep-lines ( regexpt -- )

Vocabulary

tools.grep

Inputs

regexpt

an object

Outputs

None

Definition

USING: io kernel regexp ;

IN: tools.grep

: grep-lines ( regexpt -- )
    [ [ dup ] ] dip [ matches? [ print ] [ drop ] if ] curry
    compose each-line ;