bits-all-equal? ( imm imm-width -- ? )

Vocabulary

cpu.arm.64.assembler

Inputs

imm	an object
imm-width	an object

Outputs

?

an object

Definition

USING: grouping kernel sequences ;

IN: cpu.arm.64.assembler

: bits-all-equal? ( imm imm-width -- ? )
    [ [ length ] dip = ] [ drop all-equal? ] 2bi and ;