compress-dynamic ( byte-array -- byte-array )

Vocabulary

compression.gzip

Inputs

byte-array

an object

Outputs

byte-array

an object

Definition

USING: accessors compression.gzip.private sequences
sequences.deep ;

IN: compression.gzip

: compress-dynamic ( byte-array -- byte-array )
    (compress-dynamic) [ deflate-block? ] deep-filter
    flatten-blocks underlying>> gzip-header prepend
    B{ 0 0 } append ;