bootstrap-factor ( path -- )

Vocabulary

zealot.factor

Inputs

path

an object

Outputs

None

Definition

USING: accessors arrays bootstrap.image calendar io.directories
io.launcher kernel sequences system ;

IN: zealot.factor

: bootstrap-factor ( path -- )
    [
        <process> factor-path "-i=" my-boot-image-name append
        "-no-user-init" 3array os macosx =
        [ { "arch" "-x86_64" } prepend ] when >>command
        +closed+ >>stdin "./bootstrap-log" >>stdout
        +stdout+ >>stderr 30 minutes >>timeout
        +new-group+ >>group try-process
    ] with-directory ;