copy-output-file-as ( name new-name -- )

Vocabulary

build-from-source

Inputs

name	an object
new-name	an object

Outputs

None

Definition

USING: io.directories io.files io.pathnames kernel ;

IN: build-from-source

: copy-output-file-as ( name new-name -- )
    [
        prepend-current-path dup file-exists?
        [ no-output-file ] unless
    ] [ get-out-directory prepend-path ] bi* copy-file ;