(bit-count) ( x -- n )

Vocabulary

math.bitwise.private

Inputs

x

an object

Outputs

n

an object

Definition

IN: math.bitwise.private

GENERIC: (bit-count) ( x -- n )

Methods

USING: kernel math math.bitwise.private ;

M: bignum (bit-count)
    [ 0 ] [ [ byte-bit-count ] [ -8 shift (bit-count) ] bi + ]
    if-zero ;


USING: kernel.private math math.bitwise.private ;

M: fixnum (bit-count) fixnum-bit-count { fixnum } declare ;
    inline