>Nimms ( element element-size -- N imms )

Vocabulary

cpu.arm.64.assembler.private

Inputs

element	an object
element-size	an object

Outputs

N	an object
imms	an object

Definition

USING: kernel math math.bitwise ;

IN: cpu.arm.64.assembler.private

: >Nimms ( element element-size -- N imms )
    [ bit-count 1 - ] [ log2 1 + ] bi* 7 [ on-bits ] bi@ bitxor
    bitor 6 toggle-bit [ -6 shift ] [ 6 bits ] bi ;