compress-fixed ( byte-array -- byte-array' )

Vocabulary

compression.gzip

Inputs

byte-array

a byte-array

Outputs

byte-array'

a byte-array

Word description

Compresses bytes into a gzip member using fixed Huffman codes. The result includes the gzip header, checksum, and uncompressed size.

Definition

USING: accessors bit-arrays compression.gzip.private kernel
sequences ;

IN: compression.gzip

: compress-fixed ( byte-array -- byte-array' )
    dup (compress-fixed) [ flatten-pair ] map
    256 (lit-to-bits) suffix concat ?{ t t f } prepend
    underlying>> wrap-gzip ;