bit-vector
Bit vectors

Next:

bit-vector? ( object -- ? )

Vocabulary
bit-vectors

Class description
The class of resizable bit vectors. See Bit vectors for information.

Definition

USING: bit-arrays sequences.private ;

IN: bit-vectors

TUPLE: bit-vector
    { underlying bit-array initial: ?{ } }
    { length array-capacity initial: 0 } ;

Methods

USING: bit-vectors prettyprint.custom ;

M: bit-vector >pprint-sequence ;


USING: bit-vectors growable kernel ;

M: bit-vector contract 2drop ;


USING: bit-vectors classes kernel sequences ;

M: bit-vector equal?
    over bit-vector instance? [ sequence= ] [ 2drop f ] if ;


USING: bit-arrays bit-vectors classes kernel sequences ;

M: bit-vector like
    drop dup bit-vector instance? [
        dup bit-array instance?
        [ dup length bit-vector boa ] [ >bit-vector ] if
    ] unless ; inline


USING: bit-vectors kernel sequences ;

M: bit-vector new-resizable drop <bit-vector> ; inline


USING: bit-arrays bit-vectors kernel math sequences ;

M: bit-vector new-sequence
    drop [ <bit-array> ] [ >fixnum ] bi bit-vector boa ; inline


USING: bit-vectors prettyprint.custom ;

M: bit-vector pprint* pprint-object ;


USING: bit-vectors kernel prettyprint.custom ;

M: bit-vector pprint-delims drop \ ?V{ \ } ;