set-content-length ( -- )

Vocabulary

asn1

Inputs

None

Outputs

None

Definition

USING: accessors endian io kernel math namespaces ;

IN: asn1

: set-content-length ( -- )
    read1 dup 127 <= [ 127 bitand read be> ] unless
    elements get contentlength<< ;