38 lines
1.4 KiB
Factor
38 lines
1.4 KiB
Factor
|
USING: arrays bit-arrays help.markup help.syntax kernel
|
||
|
combinators ;
|
||
|
|
IN: bit-vectors
|
||
|
|
|
||
|
|
ARTICLE: "bit-vectors" "Bit vectors"
|
||
|
|
"A bit vector is a resizable mutable sequence of bits. Bit vector words are found in the " { $vocab-link "bit-vectors" } " vocabulary."
|
||
|
|
$nl
|
||
|
|
"Bit vectors form a class:"
|
||
|
|
{ $subsection bit-vector }
|
||
|
|
{ $subsection bit-vector? }
|
||
|
|
"Creating bit vectors:"
|
||
|
|
{ $subsection >bit-vector }
|
||
|
|
{ $subsection <bit-vector> }
|
||
|
|
"Literal syntax:"
|
||
|
|
{ $subsection POSTPONE: ?V{ }
|
||
|
|
"If you don't care about initial capacity, a more elegant way to create a new bit vector is to write:"
|
||
|
|
{ $code "?V{ } clone" } ;
|
||
|
|
|
||
|
|
ABOUT: "bit-vectors"
|
||
|
|
|
||
|
|
HELP: bit-vector
|
||
|
|
{ $description "The class of resizable bit vectors. See " { $link "bit-vectors" } " for information." } ;
|
||
|
|
|
||
|
|
HELP: <bit-vector>
|
||
|
|
{ $values { "n" "a positive integer specifying initial capacity" } { "bit-vector" bit-vector } }
|
||
|
|
{ $description "Creates a new bit vector that can hold " { $snippet "n" } " bits before resizing." } ;
|
||
|
|
|
||
|
|
HELP: >bit-vector
|
||
|
|
{ $values { "seq" "a sequence" } { "bit-vector" bit-vector } }
|
||
|
|
{ $description "Outputs a freshly-allocated bit vector with the same elements as a given sequence." } ;
|
||
|
|
|
||
|
|
HELP: ?V{
|
||
|
|
{ $syntax "?V{ elements... }" }
|
||
|
|
{ $values { "elements" "a list of booleans" } }
|
||
|
|
{ $description "Marks the beginning of a literal bit vector. Literal bit vectors are terminated by " { $link POSTPONE: } } "." }
|
||
|
|
{ $examples { $code "?V{ t f t }" } } ;
|
||
|
|
|