check-ldcache-magic ( header expected -- )

Vocabulary

ldcache.private

Inputs

header	an object
expected	an object

Outputs

None

Definition

USING: accessors byte-arrays kernel ;

IN: ldcache.private

: check-ldcache-magic ( header expected -- )
    [ magic>> ] dip [ >byte-array ] bi@ check-magic ;