do-load ( -- )

Vocabulary

mason.test

Inputs

None

Outputs

None

Definition

USING: assocs io.encodings.utf8 io.files kernel mason.common ;

IN: mason.test

: do-load ( -- )
    "" load-no-restarts
    [ keys load-all-vocabs-file to-file ] [
        load-all-errors-file utf8
        [ load-failures. ] with-file-writer
    ] bi ;