update-reverse-table ( huffman-code n table -- )

Vocabulary

compression.huffman.private

Inputs

huffman-code	an object
n	an object
table	an object

Outputs

None

Definition

USING: assocs kernel sequences ;

IN: compression.huffman.private

: update-reverse-table ( huffman-code n table -- )
    [ drop all-patterns ]
    [ nip [ [ swap ] curry ] dip [ set-at ] curry compose each ]
    3bi ;