Nimmrimms ( imm imm-width -- N imms immr )

Vocabulary

cpu.arm.64.assembler

Inputs

imm	an object
imm-width	an object

Outputs

N	an object
imms	an object
immr	an object

Definition

USING: kernel ;

IN: cpu.arm.64.assembler

: Nimmrimms ( imm imm-width -- N imms immr )
    [ make-bits* ] keep 2dup bits-all-equal?
    [ logical-immediate-error ] when
    repeating-element over bit-pairs dup transitions 2 =
    [ element-error ] unless [ Nimms ] [ immr ] bi* ;