read-cluster-none ( -- offsets blobs )

Vocabulary

zim

Inputs

None

Outputs

offsets	an object
blobs	an object

Definition

USING: arrays io kernel math sequences ;

IN: zim

: read-cluster-none ( -- offsets blobs )
    read-uint32 dup 4 /i f <array> [ set-first ] keep
    dup rest-slice [ drop read-uint32 ] map! drop dup
    [ last ] [ first ] bi - read ;