check-disk-space ( -- )

Vocabulary

mason.disk

Inputs

None

Outputs

None

Definition

USING: kernel ;

IN: mason.disk

: check-disk-space ( -- )
    sufficient-disk-space?
    [ "Less than 1 Gi free disk space." throw ] unless ;