(%compare-imm) ( src1 src2 -- )

Vocabulary

cpu.arm.64

Inputs

src1	an object
src2	an object

Outputs

None

Definition

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

IN: cpu.arm.64

: (%compare-imm) ( src1 src2 -- )
    {
        { [ dup fixnum? ] [ tag-fixnum CMP ] }
        { [ dup not ] [ drop \ f type-number CMP ] }
    } cond ;