(%slot) ( OBJ SLOT scale tag -- register operand )

Vocabulary

cpu.arm.64

Inputs

OBJ	an object
SLOT	an object
scale	an object
tag	an object

Outputs

register	an object
operand	an object

Definition

USING: cpu.arm.64.assembler kernel math ;

IN: cpu.arm.64

:: (%slot) ( OBJ SLOT scale tag -- register operand )
    temp OBJ tag dup neg? [ neg ADD ] [ SUB ] if
    temp SLOT scale <LSL*> ; inline