check-magic-error ( magic num -- )

Vocabulary

magic.private

Inputs

magic	an object
num	an object

Outputs

None

Definition

USING: kernel magic.ffi ;

IN: magic.private

: check-magic-error ( magic num -- )
    -1 = [ magic_error throw ] [ drop ] if ;