zim-cluster

Vocabulary

zim

Definition

IN: zim

TUPLE: zim-cluster offsets blobs ;

Methods

USING: accessors math sequences zim ;

M: zim-cluster length offsets>> length 1 - ;


USING: accessors kernel math sequences sequences.private zim ;

M:: zim-cluster nth-unsafe ( n cluster -- elt )
    cluster offsets>> :> offsets cluster blobs>> :> blobs 0
    offsets nth :> zero n offsets nth :> from n 1 + offsets nth
    :> to from to [ zero - ] bi@ blobs subseq ;