fixup-word ( word -- offset )

Vocabulary

bootstrap.image.private

Inputs

word

an object

Outputs

offset

an object

Definition

USING: accessors kernel ;

IN: bootstrap.image.private

: fixup-word ( word -- offset )
    transfer-word
    [ lookup-object ]
    [ [ vocabulary>> ] [ name>> ] bi not-in-image ] ?unless ;