zim

Vocabulary

zim

Definition

USING: destructors ;

IN: zim

TUPLE: zim < disposable
    path stream header mime-types urls titles entries clusters
    cluster-cache ;

Methods

USING: accessors assocs zim ;

M: zim assoc-size header>> entry-count>> ;


USING: arrays assocs combinators.short-circuit kernel math
sequences splitting zim ;

M: zim at*
    [
        [
            "/" split dup
            { [ length 1 > ] [ first length 1 = ] } 1&&
            [ unclip-slice first ] [ f ] if swap "/" join
        ] [ read-entry-url 2array t ] bi*
    ] with-zim ;


USING: accessors destructors kernel zim ;

M: zim dispose* [ dispose f ] change-stream drop ;


USING: accessors sequences zim ;

M: zim length header>> entry-count>> ;


USING: arrays kernel sequences.private zim ;

M: zim nth-unsafe
    [
        [ read-entry-index dup ] [ read-entry-content drop ] bi
        2array
    ] with-zim ;