bit-vector
Bit vectors
Next:bit-vector? ( object -- ? )


Vocabulary
bit-vectors

Word 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{ \ } ;