lookup-old-code ( lzw -- vector )


Vocabulary
compression.lzw

Inputs
lzwan object


Outputs
vectoran object


Definition
USING: accessors kernel sequences ;

IN: compression.lzw

: lookup-old-code ( lzw -- vector )
[ old-code>> ] [ table>> ] bi nth ;