copy-match ( n distance output -- )

Vocabulary

compression.deflate.private

Inputs

n	an object
distance	an object
output	an object

Outputs

None

Definition

USING: compression.deflate kernel math sequences ;

IN: compression.deflate.private

:: copy-match ( n distance output -- )
    distance output length >
    [ "distance exceeds output history" invalid-deflate ] when n
    [ output length distance - output nth output push ] times ;