reverse-bits ( value bits -- value' )


Vocabulary
compression.huffman

Inputs
valuean object
bitsan object


Outputs
value'an object


Definition
USING: bit-arrays kernel sequences ;

IN: compression.huffman

: reverse-bits ( value bits -- value' )
[ integer>bit-array ] dip f pad-tail
reverse bit-array>integer ; inline