check-magic ( n -- )

Vocabulary

terminfo.private

Inputs

n

an object

Outputs

None

Definition

USING: kernel ;

IN: terminfo.private

: check-magic ( n -- ) MAGIC = [ bad-magic ] unless ;