set-abp ( abp bitstream -- )


Vocabulary
bitstreams

Inputs
abpan integer
bitstreama bit-reader


Outputs
None

Word description
Moves the read cursor of the bit-reader to abp bits from the start of the stream. The position of the cursor in terms of bytes and bits can be changed by directly updating the bit-reader tuple using >>byte-pos and >>bit-pos.

Definition
USING: accessors kernel math ;

IN: bitstreams

: set-abp ( abp bitstream -- )
[ 8 /mod ] dip [ bit-pos<< ] [ byte-pos<< ] bi ; inline