check-user-init-errors ( -- ? )

Vocabulary

mason.test

Inputs

None

Outputs

?

an object

Definition

USING: assocs command-line kernel namespaces tools.errors ;

IN: mason.test

: check-user-init-errors ( -- ? )
    user-init-errors get-global assoc-empty?
    [ f ] [ :user-init-errors t ] if ;