copy-image ( -- )

Vocabulary

mason.build

Inputs

None

Outputs

None

Definition

USING: io.directories io.pathnames kernel mason.config
mason.platform namespaces ;

IN: mason.build

: copy-image ( -- )
    builds-dir get target-boot-image-name append-path
    [ "." copy-file-into ] [ "factor" copy-file-into ] bi ;