(emit-slot-imm) ( infos -- dst )

Vocabulary

compiler.cfg.intrinsics.slots

Inputs

infos

an object

Outputs

dst

an object

Definition

USING: accessors compiler.cfg.hats compiler.cfg.stacks kernel
sequences ;

IN: compiler.cfg.intrinsics.slots

: (emit-slot-imm) ( infos -- dst )
    ds-drop
    [ ds-pop ] [ [ second literal>> ] [ first value-tag ] bi ]
    bi* ^^slot-imm ;