useless-files ( -- seq )

Vocabulary

mason.release.tidy

Inputs

None

Outputs

seq

an object

Definition

USING: bootstrap.image kernel mason.config namespaces sequences
system ;

IN: mason.release.tidy

: useless-files ( -- seq )
    cleanup-list image-names [ boot-image-name ] map append
    target-os get macosx? [ "Factor.app" suffix ] unless ;