decode-rest ( buf stream encoding n i -- count )

Vocabulary

io.encodings.private

Inputs

buf	an object
stream	an object
encoding	an object
n	an object
i	an object

Outputs

count

an object

Definition

USING: kernel math ;

IN: io.encodings.private

: decode-rest ( buf stream encoding n i -- count )
    2dup =
    [ 4nip ] [
        decode-next
        [ swap [ store-decode ] [ 1 + ] bi decode-rest ]
        [ 4nip ] if*
    ] if ; inline recursive