bit-count ( n -- n' )

Vocabulary

math.integers.private

Inputs

n

an object

Outputs

n'

an object

Definition

USING: kernel math ;

IN: math.integers.private

: bit-count ( n -- n' )
    dup fixnum? [ bignum-bit-count ] unless ; inline