maybe-increment-code-size ( lzw -- lzw )

Vocabulary

compression.lzw

Inputs

lzw

an object

Outputs

lzw

an object

Definition

USING: kernel ;

IN: compression.lzw

: maybe-increment-code-size ( lzw -- lzw )
    dup code-space-full? [ increment-code-size ] when ;