len-lits ( vec -- seq )

Vocabulary

compression.gzip.private

Inputs

vec

an object

Outputs

seq

an object

Definition

USING: arrays kernel sequences ;

IN: compression.gzip.private

: len-lits ( vec -- seq )
    [ dup array? [ first ] when dup array? [ first ] when ] map
    ;