read-extinfo ( header -- extinfo )

Vocabulary

terminfo.private

Inputs

header

an object

Outputs

extinfo

an object

Definition

USING: accessors combinators io ;

IN: terminfo.private

: read-extinfo ( header -- extinfo )
    word-align-input read-extinfo-header {
        [ read-booleans ]
        [ read-numbers ]
        [ #strings>> read-shorts ]
        [ field-count read-shorts ]
        [ string-bytes>> read ]
    } cleave parse-extinfo ;