read-packed-bytes ( str -- bytes )

Vocabulary

pack.private

Inputs

str

an object

Outputs

bytes

an object

Definition

USING: io kernel pack sequences ;

IN: pack.private

: read-packed-bytes ( str -- bytes )
    dup packed-length [ read dup length ] keep =
    [ nip ] [ packed-read-fail ] if ; inline