byte-bit-count ( byte -- table )

Vocabulary

math.bitwise.private

Inputs

byte

an object

Outputs

table

an object

Definition

USING: math sequences.private ;

IN: math.bitwise.private

: byte-bit-count ( byte -- table )
    255 bitand B{
        0 1 1 2 1 2 2 3 1 2 2 3 2 3 3 4 1 2 2 3 2 3 3 4 2 3 3 4
        3 4 4 5 1 2 2 3 2 3 3 4 2 3 3 4 3 4 4 5 2 3 3 4 3 4 4 5
        3 4 4 5 4 5 5 6 1 2 2 3 2 3 3 4 2 3 3 4 3 4 4 5 2 3 3 4
        3 4 4 5 3 4 4 5 4 5 5 6 2 3 3 ~157 more~
    } nth-unsafe ; inline