^^load-literal ( obj -- dst )

Vocabulary

compiler.cfg.hats

Inputs

obj

an object

Outputs

dst

an object

Definition

USING: kernel math ;

IN: compiler.cfg.hats

: ^^load-literal ( obj -- dst )
    dup fixnum? [ ^^load-integer ] [ ^^load-reference ] if ;