run-uniq ( -- )

Vocabulary

tools.uniq

Inputs

None

Outputs

None

Definition

USING: command-line io.encodings.utf8 io.files kernel namespaces
sequences ;

IN: tools.uniq

: run-uniq ( -- )
    command-line get [ ?first ] [ ?second ] bi
    [ utf8 [ uniq-file ] with-file-writer ] [ uniq-file ] if* ;