read-until-terminated ( data -- data )

Vocabulary

compression.inflate.private

Inputs

data

an object

Outputs

data

an object

Definition

USING: bitstreams kernel ;

IN: compression.inflate.private

: read-until-terminated ( data -- data )
    [ dup 8 swap read 0 = ] [ ] until ;