code-len-dict ( -- code-dict )

Vocabulary

compression.gzip.private

Inputs

None

Outputs

code-dict

an object

Definition

USING: arrays compression.huffman kernel sequences ;

IN: compression.gzip.private

: code-len-dict ( -- code-dict )
    run-free-codes [ dup array? [ first ] when ] map
    generate-canonical-codes ;