get-abp ( bitstream -- abp )


Vocabulary
bitstreams

Definition
USING: accessors kernel math ;

IN: bitstreams

: get-abp ( bitstream -- abp )
[ byte-pos>> 8 * ] [ bit-pos>> + ] bi ; inline